本帖最后由 hellohgh 于 2022-1-4 14:41 编辑
iptool.vbs 获取到IP信息。- ' 要下载的文件
- strFileURL = "https://ip.tool.lu/"
- ' 文件存放路径
- strHDLocation = "c:\ip.txt"
-
- Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP")
-
- objXMLHTTP.open "GET", strFileURL, false
- objXMLHTTP.send()
-
- If objXMLHTTP.Status = 200 Then
- Set objADOStream = CreateObject("ADODB.Stream")
- objADOStream.Open
- objADOStream.Type = 1
-
- objADOStream.Write objXMLHTTP.ResponseBody
- objADOStream.Position = 0
-
- Set objFSO = Createobject("Scripting.FileSystemObject")
- If objFSO.Fileexists(strHDLocation) Then objFSO.DeleteFile strHDLocation
- Set objFSO = Nothing
-
- objADOStream.SaveToFile strHDLocation
- objADOStream.Close
- Set objADOStream = Nothing
- End if
-
- Set objXMLHTTP = Nothing
复制代码 获取到网页内容并保存到本地,: c:\ip.txt- 当前IP: 183.0.227.224
- 归属地: 中国 广东 茂名
复制代码 如何使用BAT命令,调用这个值里面落的iP,中国,广东,茂名??并设置为变量,随时调用呢?
最好有不用下载保存文丁,直接调用的方法。。。。新手脑瓜痛。。。新手脑瓜痛。。。新手脑瓜痛。。。
:dizzy: :dizzy: :dizzy: |