读书人

微软的函数居然获得的IP和机器名是异常

发布时间: 2012-02-10 21:27:42 作者: rapoo

微软的函数居然获得的IP和机器名是错误的
Dim MyIp As IPHostEntry = Dns.GetHostEntry(Dns.GetHostName)
'获取本机机器名
Dim Name As String = MyIp.HostName.ToString
'获取本机IP地址
Dim Ip As String = MyIp.AddressList.GetValue(0).ToString

机器名是 078 IP :192.168.1.100 无盘机器 XPSP1系统

我用上面的函数获得的IP和机器名居然都是 0.0.0.58
我在注册表里查0.0.0.58居然没有记录
谁能帮我解决这个问题啊?

[解决办法]
没见过,帮顶.
[解决办法]
我试了一下代码是正常。。。
[解决办法]
2005获得本机机器名 strUserName = SystemInformation.ComputerName
我试过好用的
[解决办法]
strUser = SystemInformation.Computername '获取计算机名
[解决办法]
这样的话你要查询网卡IP,而不是系统IP。。。


[解决办法]
试试这个
ProcessStartInfo psi = new ProcessStartInfo( "ipconfig ", "/all ");
psi.RedirectStandardOutput = true;
psi.UseShellExecute = false;
Process p = Process.Start(psi);
Console.WriteLine(Regex.Match(p.StandardOutput.ReadToEnd(), @ "[0-9A-F]{2}(-[0-9A-F]{2}){5} "));

读书人网 >VB Dotnet

热点推荐