VB.NET2010 怎么獲取IP

1.獲取當前電腦名：System.Net.Dns.GetHostName()

創新互聯主營安化網站建設的網絡公司,主營網站建設方案,手機APP定制開發,安化h5微信小程序搭建,安化網站營銷推廣歡迎安化等地區企業咨詢

2.根據電腦名取出全部IP地址：System.Net.Dns.Resolve(電腦名).AddressList

或者 System.Net.Dns.GetHostByName(電腦名).AddressList

3.根據IP地址取出電腦名：System.Net.Dns.Resolve(IP地址).HostName

求大神指點 vb.net 的IPEndPoint 要怎么才能獲取客戶端的IP地址或者主機名字呀?

Dim?strHostName?As?String????????strHostName?=?Dns.GetHostName()????????Dim?ipEntry?As?IPHostEntry????????ipEntry?=?Dns.GetHostEntry(strHostName)????????Dim?ip?As?String????????ip?=?ipEntry.AddressList(0).ToString()

vb.net 獲取局域網計算機的當前用戶名和計算機型號等信息

Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Private Sub GetName()

Dim sJM As String

Dim sMC As String

Dim sIP As String

Dim s As String

s = String(128, Chr(0))

GetComputerName s, Len(s)

s = UCase(Left(s, InStr(1, s, Chr(0)) - 1))

sJM = s'計算機名稱

s = String(128, Chr(0))

GetUserName s, Len(s)

s = UCase(Left(s, InStr(1, s, Chr(0)) - 1))

sMC = s‘當前用戶名稱

End Sub

'用這種方法在遠程獲得再發回本機就可以吧

'取計算機型號暫時不會

請問在VB.NET中怎樣獲取本機IP？

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

本文標題：vb.net獲取主機名的簡單介紹
URL鏈接：http://m.jcarcd.cn/article/hecgse.html