在VB里面怎样读取主板的序列号?

[lichunloverit]

我想读取用户机器上的主板信息(比如序列号，或其它)，生成不同的注册信息,请高手前来指点，谢谢

[kmzs]

可能吗？ 。。。好像非常困难的样子哦。。。

[LichKingSZ]

看看这个:
http://www.csdn.net/cnshare/soft/9/9091.shtm

[yinweihong]

楼上那位兄弟的连接上没有哦
搜"BiosNT"

[yinweihong]

优化大师V5.91也可以读出来。。。。。。。。。。。

[lichunloverit]

在VB里面怎样读取，不用别人的控件

[lxcc]

WMI
http://www.applevb.com/art/ar_wmi.htm

[lxcc]

这个完整一些!
http://dev.csdn.net/develop/article/23/23371.shtm

[junki]

Private Sub wmiBaseBoardInfo()
Dim wmiObjSet As SWbemObjectSet
Dim obj As SWbemObject
Set wmiObjSet = GetObject("winmgmts:\\.").InstancesOf("Win32_BaseBoard")
On Local Error Resume Next
For Each obj In wmiObjSet
MsgBox "主板序列号:" & obj.SerialNumber
Next
End Sub