Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations wOOdy-Soft on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

how to get volume serila number 2

Status
Not open for further replies.

krishnarjunrao

Programmer
Mar 7, 2001
27
Hai Freinds !
Previously I used to get volume serial number of a hard
disk using ct.lib. But now I'm not getting the volume
serial number of 32 bit os (windows) hdd.
How to get this number. Please help.
Thank you.
 
Run a DIR xxx.xxx > DIR.TXT and the volume serial number is just after "Volume serial Number is". The xxx.xxx just keeps the file small.

Ian Boys
DTE Systems Ltd
 
This function I wrote years ago, helped me alot... I used it for Copy Protection stuff... Here you go

Function ReadSerial()
Local Serial,nHandle
Run VOL > SER
nHandle = Fopen("SER")
If Ferror() != 0
? Ferror()
Inkey(0)
Endif
Fseek(nHandle,-11,2)
Serial = FREADSTR(nHandle,9)
Fclose(nHandle)
Ferase("SER")
Return(Serial)
Please let me know if this helped you :)

Tekno
Wireless Toyz
Ypsilanti, Michigan
 
Hey man!

You are a genius. No libs, no assembler, no C.
Simple and efficiant in most cases. [2thumbsup]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top