中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-06-13 19:09
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 急!!!批处理查看本机IP和外网IP
楼 主 急!!!批处理查看本机IP和外网IP 发表于 2008-03-18 14:23 ·  中国 广东 广州 电信
初级用户
★★
积分 131
发帖 119
注册 2007-06-12 22:50
UID 91125
性别 男
来自 gz
状态 离线
急!!!批处理查看本机IP和外网IP

问:批处理可以做到查外网IP吗?(本地IP是:192.168.1.2~254,这里是内网的)
2 发表于 2008-03-18 14:35 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
UID 112398
性别 男
状态 离线
可以,但不知道你要查看哪个外网,是局域网服务器主机的外网ip吗?
3 发表于 2008-03-18 14:43 ·  中国 广东 广州 电信
高级用户
★★★
潜水修练批处理
积分 788
发帖 366
注册 2006-12-31 02:43
UID 75048
性别 男
状态 离线
外网IP
利用wget.exe(http://www.yx127.com/tools/wget_1.82.rar)


@echo off
del ips.asp 1>nul 2>&1
wget http://www.ip138.com/ips.asp 1>nul 2>&1
for /f "tokens=2 skip=2 delims=" %%i in ('find "您的IP地址是:" ips.asp') do echo %%i
del ips.asp 1>nul 2>&1
pause
正在潜水修练的批处理小白
4 发表于 2008-03-18 14:47 ·  中国 广东 广州 电信
初级用户
★★
积分 131
发帖 119
注册 2007-06-12 22:50
UID 91125
性别 男
来自 gz
状态 离线
还要下文件啊,我做了一个。
@echo off
echo Set objXML = WScript.GetObject("http://www.apnic.net/")

>>apnic.vbs
echo While objXML.readyState = "loading">>apnic.vbs
echo WScript.Sleep 100>>apnic.vbs
echo Wend>>apnic.vbs
echo Set coll = objXML.getElementsByTagName("td")>>apnic.vbs
echo WScript.Echo coll(0).innertext>>apnic.vbs
echo Set objXML = Nothing>>apnic.vbs
for /f "delims=: tokens=2" %%i in ('cscript //nologo apnic.vbs') do

set "wip=%%i"
echo 本机外网IP是 %wip%>>ip.txt
del apnic.vbs /q
5 发表于 2008-03-18 14:57 ·  中国 广东 广州 电信
高级用户
★★★
潜水修练批处理
积分 788
发帖 366
注册 2006-12-31 02:43
UID 75048
性别 男
状态 离线
vbs和批处理的差别之一:
批处理没有自带的下载命令;
纯批处理的话就是用wget了。

P.S. 楼上的有语法错误(貌似复制——粘贴时换行出问题了),修改了一下:

@echo off
echo Set objXML = WScript.GetObject("http://www.apnic.net/")>apnic.vbs
echo While objXML.readyState = "loading">>apnic.vbs
echo WScript.Sleep 100>>apnic.vbs
echo Wend>>apnic.vbs
echo Set coll = objXML.getElementsByTagName("td")>>apnic.vbs
echo WScript.Echo coll(0).innertext>>apnic.vbs
echo Set objXML = Nothing>>apnic.vbs
for /f "delims=: tokens=2" %%i in ('cscript //nologo apnic.vbs') do echo 本机外网IP是 %%i>ip.txt
del apnic.vbs /q


[ Last edited by dikex on 2008-3-18 at 03:01 PM ]
正在潜水修练的批处理小白
6 发表于 2008-03-18 14:58 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
UID 112398
性别 男
状态 离线
我觉得还是用tracert好些:
tracert www.baidu.com
pause
在随后出现的ip列表中由上往下第一个非局域网ip就是局域网的外网ip,至于要把它单独列出来是不是没这个必要了。
7 发表于 2008-03-18 15:01 ·  中国 广东 广州 电信
高级用户
★★★
潜水修练批处理
积分 788
发帖 366
注册 2006-12-31 02:43
UID 75048
性别 男
状态 离线
觉得tracert有时会有的奇怪:

如现在我的IP是59.41.32.*

但tracert www.baidu.com的结果是:

Tracing route to www.a.shifen.com
over a maximum of 30 hops:

1 43 ms 42 ms 43 ms 220.181.37.55

Trace complete.
正在潜水修练的批处理小白
8 试试这个: 发表于 2008-03-18 16:17 ·  中国 湖南 株洲 电信
金牌会员
★★★★
永远的学习者
积分 3,105
发帖 1,276
注册 2008-03-08 13:00
UID 112398
性别 男
状态 离线
@echo off
for /f "delims=: tokens=2" %%i in ('ipconfig/all ^| find "DNS"') do set dns=%%i
for /f "skip=6 tokens=8" %%i in ('tracert %dns%') do set ip=%%i
echo %ip%

注:在我这里(xp+sp2环境)skip=6,不知道你那里是要设为5还是6?
也可以这样:
@echo off
for /f "skip=6 tokens=8" %%i in ('tracert %dns%') do (
for /f "delims=: tokens=2" %%i in ('ipconfig/all ^| find "DNS"') do (
set dns=%%i
)
set ip=%%i
)
echo %ip%


[ Last edited by zw19750516 on 2008-3-18 at 05:33 PM ]
论坛跳转: