完整错误是
找不到指定的模块。 (HRESULT的例外情况: 0x8007007E)
我在许多机器上运行相同的代码没有问题,客户端使用Windows 7。
代码是
Function OperatingSystemDetails() As String
Dim RetString As New System.Text.StringBuilder
Try
Dim searcher As New ManagementObjectSearcher("root\CIMV2", "SELECT * FROM Win32_OperatingSystem")
For Each queryObj As ManagementObject In searcher.Get()
RetString.Append("SerialNumber: " & StrReverse(Trim(queryObj("SerialNumber"))) & Environment.NewLine)
Next
Catch err As ManagementException
RetString.Clear()
RetString.Append("ERROR: " & err.Message)
End Try
Return RetString.ToString
End Function
真的可能是DLL(System.Management(在System.Management.dll中))丢失或损坏,或者客户端更有可能关闭服务。有谁知道它是哪个Windows服务?
编辑:我试图找到检查数据是否存在但未通过的示例。