看了用ring3去磁盘序列号的文章，有个问题？

Question

能不能取主硬盘的磁盘序列号？
能不能取服务器上硬盘的序列号？谢谢！

Answer 1

Public Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Integer, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long 
     
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调用时使用GetSerialNumber("C:\")就可以了

Answer 2

用diskid.dll和disk32.dll获得硬盘的物理序列号 
http://www.csdn.net/Develop/read_article.asp?id=23995