登录
首页 » 其他项目 » vb 获取外网ip

vb 获取外网ip

于 2022-10-06 发布 文件大小:4.39 kB
0 66
下载积分: 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

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • 696524资源总数
  • 103930会员总数
  • 47今日下载