[网络连接] [分享]批处理查询IP地址归属地

hfg1977

call:IP_inquiry 112.234.1.110
echo %ret_str%

pause
exit/b

::======================= 查询IP地址 ==============================
:IP_inquiry <IP> 返回值=ret_str
set "cmdstr=curl -s "http://www.ip138.com/ips8.asp?ip^=%~1^&action=2"^|sed -n "/本站主数据/ s/.*^>本站主数据：\([^^^<]*\).*/\1/p""
for /f "tokens=* delims=" %%a in ('%cmdstr%') do set "ret_str=%%a"
goto:eof
复制代码

服务器可自行更改(要改代码), 不过这个服务器速度还不错.

主要是分享服务器IP ^.^

这个网站也可查自己外网IP, 如下:

call:IP_WAN
echo %ret_str%

pause
exit/b

::======================= 查询外网IP地址 ==============================
:IP_WAN 返回值=ret_str
set "cmdstr=curl -s "http://www.ip138.com/ips8.asp"^|sed -n "/您的IP地址是/{s/^<[^^^>]*^>//g;p}""
for /f "tokens=*" %%a in ('%cmdstr%') do set "ret_str=%%~a"
goto:eof
复制代码

hfg1977

回复 4# cjiabing


    当然能纯P,不过curl sed 应该作为常备工具.
这样纯P无意义.

cjiabing

好，能纯批吗？

wu4agan

真好 ，我是新来的哟！！

Batcher

感兴趣的朋友们也可以参考下这些：
http://bbs.bathome.net/thread-2870-1-1.html
http://bbs.bathome.net/thread-9024-1-1.html
http://bbs.bathome.net/thread-9158-1-1.html
http://bbs.bathome.net/thread-10197-1-1.html