Printable View
Hye
I am trying to create a protection for a program, wich suppose to prevet the user from installing it on more than one computer. How can I recognize a computer(its hardwares). I am looking for somthing like unchanged ID of a HDD, a Floppy Disk or other hardwares.
Form Niztan Aviram.
Any help whould be highly appreciated.
You can use the FileSystemObjects to get the Serial Number of a HD.
Put in references of your project the library:
"Microsoft Scripting Runtime"
and, try this code:
Dim fs as new FileSystemObject, drv as Drive
Dim lSerialNumber as Long
'Here you can specfy the drive of windows
set drv = fs.GetDrive("C:\")
'get the serial number of specified drive
lSerialNumber = drv.SerialNumber
The variable lSerialNumber will contain the Serial Number of drive C:\ in decimal notation.
Ok!
Vanclei Matheus
[email protected]
Techno Dreamer
And what if I format the volume? The number is changed and I must connect to the developer and say "My Windows crashed up and i format the drive. Please activate my program again!"?
Hi,
you can try this. I didn't test it yet so use it on your won risk. It is working for me.