Imports System.Net.NetworkInformation
strVersion = My.Application.Info.Version.ToString
strMACAddress = getMacAddress().ToString
strHostName = System.Net.Dns.GetHostName()
strIPAddress = System.Net.Dns.GetHostEntry(strHostName).AddressList(1).ToString()
Function getMacAddress()
Dim nics() As NetworkInterface = _
NetworkInterface.GetAllNetworkInterfaces
Return nics(0).GetPhysicalAddress.ToString
End Function
Showing posts with label Client IP Address. Show all posts
Showing posts with label Client IP Address. Show all posts
Wednesday, November 15, 2017
Client IP Address, Client MAC Address, Client Computer Name , VB.NET, Windows Application
Subscribe to:
Posts (Atom)