查看完整版本: 还有有关读取主板号的问题

还有有关读取主板号的问题

是这样的,我以前发过帖子,用WMI来读取主板号出不来,版主教我如何调用WMI,后来搞定了,但是现在有个问题就是在我自己的电脑上运行都没问题,同办公室内的几台电脑也都行,不过如果发给朋友的话有的读得出来,有的读不出来,有关WMI的那个wbemdisp.tlb文件都有附上的,郁闷啊,望高手指点,先谢过了!

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

对应的Windows服务是：
Windows Management Instrumentation
Windows Management Instrumentation Driver Extensions

有关服务的开启问题我也注意到了,Windows Management Instrumentation这个服务正常来说都是默认开的,Windows Management Instrumentation Driver Extensions是手动,以前有试过,两个都开启也不行,以下是我的原代码,敬请指正

请看下面的代码，我的主板的序列号是空的，不能取出。
建议你改用CPU序列号:Win32_Processor
[table=95%][tr][td][color=#000000][color=#0000ff]Set[/color] a [color=#0000cc]=[/color] [color=#ff0000]GetObject[/color][color=#0000cc]([/color][color=#ff00ff]"winmgmts:"[/color][color=#0000cc])[/color]

[color=#0000ff]Set[/color] b [color=#0000cc]=[/color] a[color=#0000cc].[/color]InstancesOf[color=#0000cc]([/color][color=#ff00ff]"Win32_BaseBoard"[/color][color=#0000cc])[/color]


[color=#0000ff]For[/color] [color=#0000ff]Each[/color] c [color=#0000ff]In[/color] b

   With c

    [color=#0000ff]If[/color] [color=#0000cc].[/color]Properties_[color=#0000cc].[/color]Count [color=#0000cc]>[/color] 0 [color=#0000ff]Then[/color]

     [color=#0000ff]Set[/color] d [color=#0000cc]=[/color] [color=#0000cc].[/color]Properties_

     

     [color=#0000ff]For[/color] [color=#0000ff]Each[/color] e [color=#0000ff]In[/color] d

      Text1 [color=#0000cc]=[/color] Text1 [color=#0000cc]&[/color] e[color=#0000cc].[/color]Name [color=#0000cc]&[/color] [color=#ff00ff]": "[/color] [color=#0000cc]&[/color] e[color=#0000cc].[/color]Value [color=#0000cc]&[/color] vbCrLf

     [color=#0000ff]Next[/color]

    [color=#0000ff]End[/color] [color=#0000ff]If[/color]

   [color=#0000ff]End[/color] With

[color=#0000ff]Next[/color][/color][/td][/tr][/table]

多谢老大指点,主板确实有点不稳定,CPU的号取得还容易