中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-07-31 19:17
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » IP地址地理位置/手机号码归属地查询(网络版) 查看 4,885 回复 15
16 发表于 2008-08-26 14:55 ·  中国 上海 普陀区 电信
新手上路
积分 14
发帖 7
注册 2008-08-25 10:53
17年会员
UID 124098
性别 男
状态 离线
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/&nbsp;//g"^|sed -r -n "/卡号归属地|卡类型/{n;p}"^|sed "s/<*>//g;s/^*//g"')

修改成了

echo !v! >>查询结果.txt
for /f "tokens=*" %%? in ('curl -s -d "mobile=!v%!action=mobile" http://www.ip138.com:8080/search.asp^|sed "s/&nbsp;//g"^|sed -r -n "/卡号归属地|卡类型/{n;p}"^|sed "s/<*>//g;s/^*//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>
论坛跳转: