- @echo off
- set/p uip=请输入要查询的IP:(默认空为本机外网IP)
- IF "%uip%" equ "" (set "dip=getip.php?action=getip&ip_url="&set "nip=你的外网 IP 是: ")else set "dip=getip.php?action=queryip&ip_url=%uip%"
- (echo Set oDOM=WScript.GetObject("http://www.ip.cn/%dip%"^)
- echo Do Until oDOM.readyState="complete"
- echo WScript.sleep 10
- echo Loop
- echo WScript.echo oDOM.documentElement.outerText)>Getip.vbs
- for /f "delims=" %%i in ('cscript //nologo Getip.vbs') do echo %nip%%%i&del Getip.vbs&pause&exit
复制代码
|