I just got the same solution form some other site thanks.
>This might help
>
drvPath="c:\"
>ofs=CreateObject('Scripting.FilesystemObject')
>drv = ofs.GetDrive(ofs.GetDriveName(drvPath))
>? drv.SerialNumber
>
>Or if more information is needed, this link might help
>
>
http://www.news2news.com/vfp/?example=98&function=145>
>
>>I dont remember how to get the HD serial from VFP
>>
>>can any one helpme?
>>
>>Thanks.
B.D.H.