waitingyou 发表于 2004-12-30 17:43:00

获得硬件标识例如:CPU、硬盘的标识

请问大虾VB或winapi里有没有函数可以获得硬件标识例如:CPU、硬盘的标识

yulijin608 发表于 2004-12-31 13:49:00

Function GetSerialNumber(strDrive As String) As Long
Dim SerialNum As Long
Dim Res As Long
Dim Temp1 As String
Dim Temp2 As String
Temp1 = String$(255, Chr$(0))
Temp2 = String$(255, Chr$(0))
Res = GetVolumeInformation(strDrive, Temp1, Len(Temp1), SerialNum, 0, 0, Temp2, _
Len(Temp2))
GetSerialNumber = SerialNum
End Function
调用形式 Label1.Caption = GetSerialNumber("c:\")

waitingyou 发表于 2005-1-4 17:52:00

兄弟,谢谢,获取硬盘标识我已经查到了,但是还没查到获取CPU序列号的函数,请问知道否?

yulijin608 发表于 2005-1-5 09:06:00

我有一个,不过是封装好的dll库,不知道你要不要,要的话我给你发过去.
页: [1]
查看完整版本: 获得硬件标识例如:CPU、硬盘的标识