你這段代碼可以獲得該主機名下的所有ip,每個ip地址都是有類型簇的,可以區(qū)別本地地址和網(wǎng)絡地址、ip6地址。
創(chuàng)新互聯(lián)公司從2013年創(chuàng)立,是專業(yè)互聯(lián)網(wǎng)技術服務公司,擁有項目成都網(wǎng)站設計、成都網(wǎng)站建設網(wǎng)站策劃,項目實施與項目整合能力。我們以讓每一個夢想脫穎而出為使命,1280元夾江做網(wǎng)站,已為上家服務,為夾江各地企業(yè)和個人服務,聯(lián)系電話:18982081108
你獲取索引為0的ip,不一定是正確的網(wǎng)絡地址,它有時順序在中間,在后面。
應該獲取所有ip,再通過ip地址簇類型區(qū)分
判斷連接本身有一個函數(shù),不過有時沒聯(lián)網(wǎng)也是真。
可以用ping,ping百度、ping訪問速度快、不經(jīng)常維護斷線的網(wǎng)絡主機。
1.獲取當前電腦名:System.Net.Dns.GetHostName()
2.根據(jù)電腦名取出全部IP地址:System.Net.Dns.Resolve(電腦名).AddressList
或者 System.Net.Dns.GetHostByName(電腦名).AddressList
3.根據(jù)IP地址取出電腦名:System.Net.Dns.Resolve(IP地址).HostName
做exe程序獲取本機IP地址用
System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName()).AddressList
做web程序獲取客戶端的IP地址用
HttpContext.Current.Request.ServerVariables("REMOTE_ADDR"])
Dim IPAdress As System.Net.IPAddress
HostName = System.Net.Dns.GetHostName '獲得本機的機器名
IPAdress = System.Net.Dns.GetHostByName(HostName).AddressList.GetValue(0) '獲得本機的IP
Me.TextBox1.Text = HostName '本機機器名
Me.TextBox2.Text = IPAdress.ToString '本機的IP