vb 获取外网ip
于 2022-10-06 发布
文件大小:4.39 kB
0 158
下载积分: 2
下载次数: 1
代码说明：
"获取外网ip源码 Private Sub Command1_Click() Dim h As Object Dim i As Integer Dim s As String Set h = CreateObject("Microsoft.XMLHTTP") GetInternetIP = False g_strInternetServerIP = "" h.Open "GET", "http://ip.3322.net", True "False h.Send If (h.ReadyState = 4) And (h.Status = 200) Then &nb
下载说明：请别用迅雷下载，失败请重下，重下不扣分！
发表评论
