>Someone knows how to do a litle code to get the HD´s serial number in Visual Fox Pro 5.0?

---

If scripting object is available (Win98, IE4-5 installed) you could also do this :

Lparameters tcDrive
oFS = CREATEOBJECT('Scripting.FileSystemObject')
oDrive = oFS.GetDrive(oFs.GetDriveName(oFs.GetAbsolutePathName(tcDrive)))
? oDrive.SerialNumber

PS:Serialnumber can be altered programmatically.
Cetin