谁有获得局域网内的主机IP地址和用户名源代码
我想实现一个功能 扫描到局域网内所以主机的IP地址和用户名，MAC地址不用 只需要IP和用户名


那位高手有这方面的代码贡献一下给小弟 谢谢

[解决办法]
NetworkInterface..::.GetAllNetworkInterfaces

Dim nics() As System.Net.NetworkInformation.NetworkInterface

nics = System.Net.NetworkInformation.NetworkInterface.GetAllNetworkInterfaces()

If nics.Length > 0 Then

If nics(0).Supports(Net.NetworkInformation.NetworkInterfaceComponent.IPv4) Then

Dim props As System.Net.NetworkInformation.IPInterfaceProperties

props = nics(0).GetIPProperties

Dim addrs As System.Net.NetworkInformation.UnicastIPAddressInformationCollection

addrs = props.UnicastAddresses

If addrs.Count > 1 Then

Dim ip As System.Net.IPAddress

ip = addrs(1).Address

Console.WriteLine(ip)

End If

End If

End If
[解决办法]
vb的：
http://bbs.bccn.net/thread-3137-1-1.html
[解决办法]
http://blog.csdn.net/wzuomin/archive/2007/06/14/1652558.aspx