Michael,

Code below will do what you want. Thing is, it does not work with Network drives.

FUNCTION GetDiskSerialNo

DECLARE INTEGER GetVolumeInformation IN WIN32API;
STRING lpRootPathName,;
STRING @lpVolumeNameBuffer,;
INTEGER nVolumeNameSize,;
INTEGER @lpVolumeSerialNumber,;
INTEGER @lpMaximumComponentLength,;
INTEGER @lpFileSystemFlags,;
STRING @lpFileSystemNameBuffer,;
INTEGER nFileSystemNameSize

LOCAL lnNumber, lcNumber

lnNumber = 0

GetVolumeInformation( "C:\",.NULL.,0,@lnNumber,0,0,.NULL.,0 )

lcNumber = SUBSTR(TRANSFORM(m.lnNumber,"@0"),3)

cSerialNo = LEFT(m.lcnumber,4)+RIGHT(m.lcnumber,4)
RETURN cSerialNo

JB

>>How can I get the volume serial number for my hard drive through VFP like I do when I type 'LABEL' in DOS? Thanks for any help
>
>Michael,
>
>You need an API call for this. There is one file here in the libs (author Paul Vlad Tatavu) that does just that.
>
>José