Best Answer baxter, 13 May 2013 - 05:10 PM
Dim NetInfo As NetworkInterface = NetworkInterface.GetAllNetworkInterfaces()(0) Dim IPaddress As String = NetInfo.IPAddress Dim DnsAddresses() As String = NetInfo.DnsAddresses Dim GatewayAddress As String = NetInfo.GatewayAddress Dim PhysicalAddress As Byte() = NetInfo.PhysicalAddress <-- MAC Dim IsDhcpEnabled As Boolean = NetInfo.IsDhcpEnabledGo to the full post