paololiu 发表于 2009-12-10 16:22:22

帮忙看下这个脚本有什么问题吗

要禁QQ,所以找了个脚本来收集QQ的IP,发现刚开始还蛮正常的,后面好多的IP都无法收集了#自动获取QQ服务器IP地址
#QQ服务器域名关键字,多个关键字之间用逗号分隔
:set QQ-STR "tencent,qq"
#QQ地址列表名
:set QQ-LST "qq"
#取得DNS缓存的A记录
:set id
#对记录进行分析
:foreach i in=$id do={
#取得域名
:setdom
:set fond "no"
#判断域名中是否有指定的关键字
:foreach k in=$QQ-STR do={
    :if([:find $dom $k]!=[:nothing]) do={:set fond "yes"}
    }
#找到关键字的话,就把IP地址保存在指定地址列表中
:if($fond="yes") do={
    /ip firewall address-list add list=$QQ-LST disabled=no address=
    }
}
#清除缓存,以便寻找新的IP
/ip dns cache flush

WGHBOY 发表于 2009-12-15 03:19:58

qq也封呀,很难活了

qbs315 发表于 2009-12-24 07:21:57

晕,Q也封啊。
页: [1]
查看完整版本: 帮忙看下这个脚本有什么问题吗