[分享]批处理查询IP地址归属地

hfg1977 · 发表于 2011-9-29 10:56:43

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

复制代码

Batcher · 发表于 2011-9-29 11:18:21

wu4agan · 发表于 2011-9-29 11:53:54

真好，我是新来的哟！！

cjiabing · 发表于 2011-9-30 00:24:48

好，能纯批吗？

hfg1977 · 发表于 2011-9-30 19:39:53

回复 4# cjiabing

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

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

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