求一个获取外网的BAT或者按键精灵源码

2024-12-31 21:32:14

推荐回答（2个）

回答1：

说明: 按键精灵源码(中文变量,相信你能看得懂)
调用方式: 将以下的所有代码复制进按键精灵内调试即可

MsgBox 获得外网IP地址()
Function 获得外网IP地址()
Dim 网页内容,开始位置,结束位置
网页内容 = lib.网络.获得网页源文件("http://iframe.ip138.com/ic.asp")
开始位置 = inStr(网页内容,"[") + 1
结束位置 = inStr(网页内容,"]") - 开始位置
获得外网IP地址 = Mid(网页内容,开始位置,结束位置)
End Function

回答2：

网站获取简单点，我有按键精灵的源码，bat批处理不外乎是使用cmd