2个回答
展开全部
在连接成功后的代码处添加以下代码即可输出外网IP到ip.txt中
if not exist getip.vbs (
echo Set oDOM = WScript.GetObject("http://www.ip138.com/ip2city.asp"^)
echo do until oDOM.readyState = "complete"
echo WScript.sleep 200
echo loop
echo WScript.echo oDOM.documentElement.outerHtml
)>getip.vbs
for /f "tokens=2 delims=[]" %%a in ('cscript //NoLogo getip.vbs^|findstr "[ ]"') do echo.%%a>>ip.txt
if not exist getip.vbs (
echo Set oDOM = WScript.GetObject("http://www.ip138.com/ip2city.asp"^)
echo do until oDOM.readyState = "complete"
echo WScript.sleep 200
echo loop
echo WScript.echo oDOM.documentElement.outerHtml
)>getip.vbs
for /f "tokens=2 delims=[]" %%a in ('cscript //NoLogo getip.vbs^|findstr "[ ]"') do echo.%%a>>ip.txt
Storm代理
2023-07-25 广告
2023-07-25 广告
StormProxies是一家国内优质海外HTTP代理商,拥有一个庞大的IP资源池,覆盖200多个地区,IP数量大且匿名度高。其优点还包括超高并发、稳定高效、技术服务等特点,同时提供HTTP、HTTPS以及SOCKS5协议支持。此外,Sto...
点击进入详情页
本回答由Storm代理提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |