重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
不是这样的, 它绑定你给它的IP (不分内外网),如果你的程序在服务器端(服务器必须有一个固定的IP)运行,你的代码读取本机IP时 就是那个固定IP了,当你的程序在动态DNS网络里运行时,读取的就是内网IP了,只有网络内的客户机才能连上,你用个办法查出外网IP ,直接给vb.net socket.bind,外网的人才能连接到你的 电脑,希望能帮到你
创新互联公司拥有网站维护技术和项目管理团队,建立的售前、实施和售后服务体系,为客户提供定制化的做网站、网站建设、网站维护、移动服务器托管解决方案。为客户网站安全和日常运维提供整体管家式外包优质服务。我们的网站维护服务覆盖集团企业、上市公司、外企网站、成都做商城网站、政府网站等各类型客户群体,为全球成百上千企业提供全方位网站维护、服务器维护解决方案。
直接对服务器请求。(该服务器要有相对的功能,连线后控件属性即包含,可设置自动回报)
找一个网页,内容含有显示浏览者ip的网址。抓该网页的内容分析获取外网的字串。
提供一个安全网址给你:
是APNIC亚洲数据中心的首页 的子页
Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
Dim str As String
str = Me.WebBrowser1.Document.Body.InnerHtml
Dim a As Integer = 0
Dim b As Integer = 0
a = InStr(str, "[")
b = InStr(str, "]")
TextBox1.Text = Mid(str, a + 1, b - a - 1)
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.WebBrowser1.Navigate("
)
End Sub
End Class
网页上显示的有点问题,form1_load 中代码是:Me.WebBrowser1.Navigate("")
原理:访问查IP网页后,获取网页上显示的本机外网ip地址