批处理之家 » BAT求助&讨论 » 批处理怎样获取本地IP和外网IP

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

返回列表发帖

Rank: 1

帖子: 63
积分: 39
技术: 1
捐助: 0
注册时间: 2012-8-11

1楼 跳转到 » 倒序看帖

字体大小: tT

发表于 2016-7-11 11:37 | 只看该作者

[网络连接] 批处理怎样获取本地IP和外网IP

本帖最后由 pcl_test 于 2016-7-11 16:40 编辑

想双击打开批处理的时候，黑窗口显示：内网IP：***
外网IP：***

1 评分人数

pcl_test: 发帖前先使用论坛搜索PB -6

学习计算机技术

Rank: 5 Rank: 5

帖子: 742
积分: 1455
技术: 63
捐助: 30
注册时间: 2010-4-5

2楼

发表于 2016-7-11 14:02 | 只看该作者

本帖最后由 pcl_test 于 2017-6-15 19:32 编辑

@echo off
:InIP
for /f "tokens=4" %%i in ('route print ^| findstr 0.0.0.0.*0.0.0.0') do (
    set InternalIP=%%i
    goto :ExIP
)
:ExIP
rem set "URL=http://city.ip138.com/ip2city.asp"
set "URL=http://ip.6655.com/ip.aspx"
>%temp%\download.vbs echo Set objDOM = WScript.GetObject("%URL%")
>>%temp%\download.vbs echo Do Until objDOM.ReadyState = "complete"
>>%temp%\download.vbs echo WScript.Sleep 100
>>%temp%\download.vbs echo Loop
>>%temp%\download.vbs echo WScript.Echo objDOM.DocumentElement.OuterText
for /f "delims=" %%i in ('cscript //nologo //e:vbscript %temp%\download.vbs') do (
    set "PublicIP=%%i"
)
echo 内网IP：%InternalIP%
echo 外网IP：%PublicIP%
pause
复制代码

Rank: 6 Rank: 6

帖子: 1266
积分: 1775
技术: 162
捐助: 0
注册时间: 2015-12-12

3楼

发表于 2016-7-11 20:13 | 只看该作者

本帖最后由 codegay 于 2016-7-12 04:45 编辑

回复 2# GNU

ip138的接口不稳定。经常变。
换个别的吧。我刚打开还先显示百度的什么云加速。

浏览器安全检查中… ip138.com.

还剩 5 秒…
百度云加速防护中
复制代码

ip.6655.com/ip.aspx
这个接口应该稳定的。软媒自己的软件也是用这个接口。

去学去写去用才有进步。安装python3代码存为xx.py 双击运行或右键用IDLE打开按F5运行

Rank: 1

帖子: 63
积分: 39
技术: 1
捐助: 0
注册时间: 2012-8-11

4楼

发表于 2016-7-11 23:18 | 只看该作者

回复 2# GNU

外网还是没法获取啊

学习计算机技术

Rank: 5 Rank: 5

帖子: 742
积分: 1455
技术: 63
捐助: 30
注册时间: 2010-4-5

5楼

发表于 2016-7-12 17:01 | 只看该作者

回复 4# gd6570

在家里测试的还是在公司测试的？
浏览器打开网页的时候需要设代理吗？
浏览器能正常打开 http://city.ip138.com/ip2city.asp 吗？