中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » IP地址地理位置/手机号码归属地查询(网络版)

‹ « [1] [2] »

bray
新手上路

积分 14
发帖 7
注册 2008-8-25
状态离线

『第 16 楼』:

Quote:

Originally posted by bray at 2008-8-26 10:39 AM:
Re 12楼

@echo off
:start_

for /f "tokens=*" %%i in (str.txt) do (
set v=%i%
echo %%i ,%v%
cls &set a=
echo %v% >>查询结果.txt
for /f "tokens=* ...

我将
echo %v% >>查询结果.txt
for /f "tokens=*" %%? in ('curl -s -d "mobile=%v%&action=mobile" http://www.ip138.com:8080/search.asp^|sed "s/ //g"^|sed -r -n "/卡号归属地|卡类型/{n;p}"^|sed "s/<[^>]*>//g;s/^[ \t]*//g"')

修改成了

echo !v! >>查询结果.txt
for /f "tokens=*" %%? in ('curl -s -d "mobile=!v%!action=mobile" http://www.ip138.com:8080/search.asp^|sed "s/ //g"^|sed -r -n "/卡号归属地|卡类型/{n;p}"^|sed "s/<[^>]*>//g;s/^[ \t]*//g"')

可以实现查询了
可输出到文本的记过是这样的：

1300000
<TDwidth=*align="center"class=tdc2>北京北京</TD>
<TDwidth=*align="center"class=tdc2>联通130卡</TD>
1300001
<TDwidth=*align="center"class=tdc2>江苏常州</TD>
<TDwidth=*align="center"class=tdc2>联通如意通卡</TD>

2008-8-26 14:55

‹ « [1] [2] »

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: