Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Mike Gagnon
  Where is Mike Gagnon?
 Pointe Claire
 Canada
 Mike Gagnon
 To: Adam Walan
  Where is Adam Walan?
 Chicago
 Illinois - United States
 Adam Walan
 Tags
Subject: RE: Hard Disk Serial No.
Thread ID: 268084 Message ID: 268687 # Views: 61 # Ratings: 0
Version: Visual FoxPro 9 SP2 Category: Security and Application Protection
Date: Wednesday, July 14, 2010 2:19:09 AM         
   


> > hi Experts,
> > How can i get Harddisk Serial No.?
> > Thanks
>
> I do use HDD serial number to prevent my customers to activate software on more computers than they purchase license for....
>
>
> Function GetHDDSerial
> Local lcserial
> fso = Create('Scripting.FileSystemObject')
> *Make sure you are taking HDD where your program is installed - some comp. may have more hdd's...
> Local install_drive
> install_drive=Left(Justdrive(my_program_install_folder),1)
> *MESSAGEBOX(install_drive)
> lcserial = Substr(Transform(fso.drives.Item(install_drive).SerialNumber, '@0'),3)
> *MESSAGEBOX(lcserial)
> Release fso
> Return lcserial
> Endfunc

That is AGAIN just the volume number (which can be change easily) and not the manufacturer's serial number that cannot be changed.

Mike Gagnon
Refox XI +(English version)

ENTIRE THREAD

Hard Disk Serial No. Posted by gaurav sharma @ 7/8/2010 1:58:07 PM
RE: Hard Disk Serial No. Posted by Glen Villar @ 7/8/2010 2:02:39 PM
RE: Hard Disk Serial No. Posted by loo peng @ 7/10/2010 11:37:39 AM
RE: Hard Disk Serial No. Posted by Mike Gagnon @ 7/10/2010 12:28:37 PM
RE: Hard Disk Serial No. Posted by khubaib khalid @ 7/11/2010 8:01:36 AM
RE: Hard Disk Serial No. Posted by Mike Gagnon @ 7/11/2010 12:29:41 PM
RE: Hard Disk Serial No. Posted by khubaib khalid @ 7/11/2010 12:45:18 PM
RE: Hard Disk Serial No. Posted by tushar @ 7/8/2010 2:06:02 PM
RE: Hard Disk Serial No. Posted by gaurav sharma @ 7/8/2010 2:12:05 PM
RE: Hard Disk Serial No. Posted by tushar @ 7/8/2010 3:49:59 PM
RE: Hard Disk Serial No. Posted by gaurav sharma @ 7/9/2010 7:55:49 AM
RE: Hard Disk Serial No. Posted by tushar @ 7/9/2010 8:20:11 AM
RE: Hard Disk Serial No. Posted by Leonid Lepin @ 7/8/2010 3:12:58 PM
RE: Hard Disk Serial No. Posted by tom knauf @ 7/9/2010 5:07:52 PM
RE: Hard Disk Serial No. Posted by loo peng @ 7/10/2010 11:35:57 AM
RE: Hard Disk Serial No. Posted by tom knauf @ 8/20/2010 4:41:05 PM
RE: Hard Disk Serial No. Posted by Yousfi Benameur @ 7/13/2010 3:23:31 PM
RE: Hard Disk Serial No. Posted by Mike Gagnon @ 7/14/2010 2:17:28 AM
RE: Hard Disk Serial No. Posted by Yousfi Benameur @ 7/14/2010 12:27:02 PM
RE: Hard Disk Serial No. Posted by Mike Gagnon @ 7/15/2010 3:09:38 AM
RE: Hard Disk Serial No. Posted by Yousfi Benameur @ 7/15/2010 8:28:43 AM
RE: Hard Disk Serial No. Posted by Leonid Lepin @ 7/15/2010 10:34:12 AM
RE: Hard Disk Serial No. Posted by Yousfi Benameur @ 7/15/2010 1:01:31 PM
RE: Hard Disk Serial No. Posted by Adam Walan @ 7/13/2010 7:40:36 PM
RE: Hard Disk Serial No. Posted by Mike Gagnon @ 7/14/2010 2:19:09 AM
RE: Hard Disk Serial No. Posted by marcelo ferrone @ 10/17/2010 5:44:32 PM