Hi all
Can anyone tell me how to find my hard drive serial number?
Thanks Reston
Printable View
Hi all
Can anyone tell me how to find my hard drive serial number?
Thanks Reston
This must have been covered a million times. Try using the forums search function.
Try this one
<vbcode>
Private Sub Command2_Click()
Dim fso As New Scripting.FileSystemObject
Dim dr As Scripting.Drive
'Get a reference to the drive object
Set dr = fso.GetDrive("C")
MsgBox Hex$(dr.SerialNumber)
End Sub
</vbcode>
Quote: