获取HWID (processorID，MotherboardSerialNumber)

Question

我正在做一个项目，我的问题是，当我试图获得主板序列号时，它完全是空的。

Dim HWID As String = String.Empty
Dim mcl As New ManagementClass("win32_processor")
Dim MOBC As ManagementObjectCollection = mcl.GetInstances()

For Each mob As ManagementObject In MOBC
    If HWID = "" Then
        HWID = mob.Properties("processorID").Value.ToString()
        Exit For
    End If

Next
Dim mboardstr As String = Nothing
 Dim mbs As ManagementObjectSearcher = New ManagementObjectSearcher("Select * From Win32_BaseBoard")
For Each mo As ManagementObject In mbs.Get
    mboardstr = mboardstr + mo("SerialNumber").ToString
Next
MsgBox(mboardstr)

是可以的，但我也非常想要主板系列，因为在那之后，我将它放入一个字符串中，并将其发送到远程主机。

为什么我没有“序列号”？谢谢!

Answer 1

并非所有系统都能获得所有数据。在这种情况下，您要查找的文本前面可能有其他数据，这些数据会阻止获取字符串。WMI非常慢，所以您只需查询所追求的内容就可以加快速度(vs SELECT *)。

这些东西中的一些应该被释放出来释放资源，在使用它们之前，您应该检查其中一些东西，以确保它们不是空的：

Dim mboardstr As String = ""
Dim query As String = "Select SerialNumber From Win32_BaseBoard"

Using mbs As ManagementObjectSearcher = New ManagementObjectSearcher(query)
    For Each mo As ManagementObject In mbs.Get
        For Each pd As PropertyData In mo.Properties
            ' should be only one
            If pd.Name = "SerialNumber" Then
                ' value is object, test for Nothing
                If pd.Value IsNot Nothing Then
                    mboardstr = pd.Value.ToString
                End If
                Exit For
            End If
        Next
    Next
End Using

您还可以设置一个断点，并检查pd.Value，以确定是否存在引导nuls或其他不可打印的控制字符(非常常见)。你想要的可能是他们的“背后”。