>>I need to read Disk Serial Number or some other unique
>>number of a NTFS disk for copy protection. It is allowed
>>that this number may change when disk is re-formatted or
>>re-created.
>>
>>However, it seems that Get Volume Information API call
>>will not return such information for NTSF disks.
>>
>>Is it possible to get this for NTFS disks ?
>
>Hi Andrus,
>
>I think both are dealing with similar things. :)
>
>I also have no solution to get this, I asked this before and get replies but we couldn't fix this. Tell me if you succeded.
>
>Regards,
Dimension aDriveTypes[6]
aDriveTypes[1] = "Unknown"
aDriveTypes[2] = "Removable"
aDriveTypes[3] = "Fixed"
aDriveTypes[4] = "Network"
aDriveTypes[5] = "CD-ROM"
aDriveTypes[6] = "RAM Disk"
oFS = CREATEOBJECT('Scripting.FileSystemObject')
For each oDrive in oFS.Drives
? "Drive :"+oDrive.DriveLetter +" Type - " + aDriveTypes[oDrive.DriveType+1]
If oDrive.isReady
?? " [Serial Number :" + transform(oDrive.SerialNumber)+"]"
Endif
Endfor
Cetin