以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  mac地址探测失败  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179097)
--  作者：zhangchi96
--  发布时间：2022/8/7 16:35:00
--  mac地址探测失败
在用户登录设置上，系统用下列语句测试用户的mac地址：

Dim Mac地址 As String
Dim nics() As System.Net.NetworkInformation.NetworkInterface = System.Net.NetworkInformation.NetworkInterface.GetAllNetworkInterfaces
Mac地址 = nics(0).GetPhysicalAddress.Tostring \'获得MAC地址

把mac地址写到用户登录的所有记录中，下次用户登录时把用户电脑上登录过的用户名推给用户，但最近使用时，发现有些用户使用时系统获得的用户mac地址为空，目前遇到的用户使用的是win7系统，请问：
1、这是什么原因，是win7的问题，还是win7的不同版本的问题？
2、如果要测出电脑cpu的序列号，该用什么语句？
谢谢指教！
--  作者：有点蓝
--  发布时间：2022/8/7 20:42:00
--  
可能有多张网卡，或者是有虚拟网卡，或者没有网卡，看看有几个地址：msgbox(nics.length)

cpu：http://foxtable.com/bbs/dispbbs.asp?boardid=2&Id=94526

或者
\'添加外部引用：System.Management.dll，代码
\'cpu
Dim mc As New System.Management.ManagementClass("Win32_Processor")
Dim moc = mc.GetInstances()
For Each mo As System.Management.ManagementObject In moc
    Output.Show( mo.Properties("ProcessorId").Value.ToString())
Next