|  | 
 
| 
脚本如下:
x
马上注册成为ROSABC会员,随时发帖回复。您需要 登录 才可以下载或查看,没有账号?会员注册 
  #自动获取QQ服务器IP地址
 #QQ服务器域名关键字,多个关键字之间用逗号分隔
 :set QQ-STR "tencent,QQtcp"
 #QQ地址列表名
 :set QQ-LST "D-DST"
 #取得DNS缓存的A记录
 :set id [/ip dns cache all find type=A]
 #对记录进行分析
 :foreach i in=$id do={
 #取得域名
 :set dom [/ip dns cache all get $i name]
 :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 dns cache all get $i data]
 }
 }
 #清除缓存,以便寻找新的IP
 /ip dns cache flush
 
 
 
 可以从DNS里面提起QQ的服务IP么
 | 
 |