【网络应用】批处理获取本机的公网IP地址 .

【方案一】BAT + VBS

 

[c-sharp] view plain copy print ?

1. @echo off  
2. set "URL=http://www.ip138.com/ip2city.asp"  
3. >%temp%/download.vbs echo Set objDOM = WScript.GetObject(WScript.Arguments(0))  
4. >>%temp%/download.vbs echo Do Until objDOM.ReadyState = "complete"  
5. >>%temp%/download.vbs echo WScript.Sleep 100  
6. >>%temp%/download.vbs echo Loop  
7. >>%temp%/download.vbs echo WScript.Echo objDOM.DocumentElement.OuterText  
8. for /f "tokens=2 delims=[]" %%a in ('cscript //nologo //e:vbscript %temp%/download.vbs "%URL%"') do (  
9.     set "PublicIP=%%a"  
10. )  
11. echo,%PublicIP%  
12. pause  

@echo off set "URL=http://www.ip138.com/ip2city.asp" >%temp%/download.vbs echo Set objDOM = WScript.GetObject(WScript.Arguments(0)) >>%temp%/download.vbs echo Do Until objDOM.ReadyState = "complete" >>%temp%/download.vbs echo WScript.Sleep 100 >>%temp%/download.vbs echo Loop >>%temp%/download.vbs echo WScript.Echo objDOM.DocumentElement.OuterText for /f "tokens=2 delims=[]" %%a in ('cscript //nologo //e:vbscript %temp%/download.vbs "%URL%"') do ( set "PublicIP=%%a" ) echo,%PublicIP% pause

 

【方案二】BAT + wget.exe(GNU)

 

[c-sharp] view plain copy print ?

1. @echo off  
2. set "URL=http://www.ip138.com/ip2city.asp"  
3. for /f "tokens=2 delims=[]" %%a in ('wget -q "%URL%" -O -') do (  
4.     set "PublicIP=%%a"  
5. )  
6. echo,%PublicIP%  
7. pause  

@echo off set "URL=http://www.ip138.com/ip2city.asp" for /f "tokens=2 delims=[]" %%a in ('wget -q "%URL%" -O -') do ( set "PublicIP=%%a" ) echo,%PublicIP% pause

 

【方案三】BAT + curl.exe(GNU)

 

 

[c-sharp] view plain copy print ?

1. @echo off  
2. set "URL=http://www.ip138.com/ip2city.asp"  
3. for /f "tokens=2 delims=[]" %%a in ('curl -s "%URL%"') do (  
4.     set "PublicIP=%%a"  
5. )  
6. echo,%PublicIP%  
7. pause