发新话题
打印

[基础] 还有有关读取主板号的问题

WMI是Windows的一个服务,如果服务没有打开,肯定取不出来。

对应的Windows服务是:
Windows Management Instrumentation
Windows Management Instrumentation Driver Extensions
换个头像,看见广告就眼红,直接封ID。

TOP

请看下面的代码,我的主板的序列号是空的,不能取出。
建议你改用CPU序列号:Win32_Processor
Set a = GetObject("winmgmts:")

Set b = a.InstancesOf("Win32_BaseBoard")


For Each c In b

   With c

    If .Properties_.Count > 0 Then

     Set d = .Properties_

     

     For Each e In d

      Text1 = Text1 & e.Name & ": " & e.Value & vbCrLf

     Next

    End If

   End With

Next
换个头像,看见广告就眼红,直接封ID。

TOP

发新话题