>>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

Yeah Cetin! Does this mean I have a convert from the FoxTools and Dark Beer Club?

In addition to the methods you mention, the Scripting.FileSystemObject is installed as a basic part of Win2K as well, and you can add it to WinNT SP3 or later, and any version of Win95 other than original, vanilla retail Win95 (and a few foreign early OEM versions), by installing the self-extracting WSH executable from msdn.microsoft.com/scripting - this will get you the latest VBScript engine, and possibly WSH 2.0 (a month ago WSH 2.0 was still beta, but may be live now.)

>PS:Serialnumber can be altered programmatically.

AMEN. And will be whenever a FORMAT is done, and any time that a new partition table is created through FDISK or the equivalent. And diskk 'cloning' software does not guarentee that you will have the same serial number in most cases, either, if there's any variation of the partition sizing.