标题: [特效代码] 求助定时探测外网IP修改IP上传到FTP的批处理 [打印本页]
作者: 穆德顺 时间: 2020-5-11 00:22 标题: 求助定时探测外网IP修改IP上传到FTP的批处理
探测到的地址会保存到IP.TXT文件 内容不能修改. 要求把TXT里的内容 只需要改其中的IP 比如: 刚回到家夯实大家好 中间是 ip地址xxx.xxx.xxx.xxx 到后面还有:恭喜发财321321等内容。 只改变中间的IP地址
中间的IP地址 会随着更新而变化。 联系地址 mudeshun@163.com- @echo off
- <"%~f0" more +5 >tmp.vbs
- cscript //NoLogo /e:vbscript tmp.vbs %1>ip.txt
- echo >nul && del tmp.vbs
- goto:eof
- set oDOM = WScript.GetObject("http://www.bathome.net/s/ip.php")
- do until oDOM.readyState = "complete"
- WScript.sleep 200
- Loop
- s=oDOM.documentElement.innerText
- set re = New RegExp
- re.Pattern="(\d+)\.(\d+)\.(\d+)\.(\d+)"
- For Each m in re.Execute(s)
- WScript.Echo m
- Next
复制代码
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |