Page 2 of 2 <12
Topic Options
#6266 - 2001-01-16 10:55 PM Re: Retreiving Serial Number
Radimus Moderator Offline
Moderator
*****

Registered: 2000-01-06
Posts: 5187
Loc: Tampa, FL
Here is what I have just come up with, I'm not certain of how much value this is, but here it is... Big thanks to Paul, who contributed greatly to this (so it can't be all my fault... )

BTW, Not all sections have been fleshed out, but you'll get the idea.

code:

;Generate DEBUG script
$CRLF=chr(13)+chr(10)
del "c:\temp\debug.scr"
$=open(1, "c:\temp\debug.scr", 5)
$=writeline(1, "d f000:a306 a69f"+$CRLF) ;compaq en 400
$=writeline(1, "d f000:15f9 164d"+$CRLF) ;compaq en 600
$=writeline(1, "d f000:65a0 67a0"+$CRLF) ;dell laptop
$=writeline(1, "q"+$CRLF)
$=close(1)
sleep 1

? "running debug"
shell "cmd /c debug <c:\temp\debug.scr >c:\temp\@wksta.res"

$Output =""
$=open(1, "c:\temp\@wksta.res")
$ = readline(1)
$line = readline(1)
while $line <> "-q"
$cline =substr($line, 62, 16)
$Output = "$output"+"$cline"
$line = readline(1)
if substr($line,1,2)="-d"
if instr("$output","dell")>0 or instr("$output","compaq")>0
? " found it"
$=close(1)
goto "parse"
endif
$Output =""
endif
? "looping"
loop
$=close(1)

arse
$output=ltrim("$output")
$output=rtrim("$output")
select
case substr($Output,1,6)="compaq" ;compaq en 400
$make =substr($Output,1,6)
$model =substr($Output,56,17)
$serial=substr($Output,74,12)
$bios =substr($Output,14,8)
$chip =substr($Output,878,13)
$speed =substr($Output,907,7)
case substr($Output,1,6)="compaq" ;compaq en 600
$make =substr($Output,1,6)
$model =substr($Output,56,17)
$serial=substr($Output,74,12)
$bios =substr($Output,14,8)
$chip =substr($Output,878,13)
$speed =substr($Output,907,7)
case instr("$output","dell")
$make =""
$model =""
$serial=""
$bios =""
$chip =""
$speed =""
endselect

? $Output
?
? $make
? $model
? $serial
? $bios
? $chip
? $speed
?
get $k


_________________________
How to ask questions the smart way <-----------> Before you ask

Top
#6267 - 2001-01-17 02:24 PM Re: Retreiving Serial Number
Anonymous
Unregistered


Ok,

I finally had a chance to work on this again. Anyways I have tried all of the utilities that were referenced earlier and most of them will work on later Dell's. However I could not get any of them to work on the GXi series. I have also dumped the entire bios section and extended bios section from memory (thanks to the memory map available on dells site). The serial number was not found anywhere in any of the dumps. This leads me to believe that you cannot get the serial number from older Dell's. Although if you run the BIOS setup it will report the serial number. I wonder if it is stored somewhere in un-addressable memory. I may just write the scripts without support for older Dell's.

Thanks,
Mark

[This message has been edited by mm0015 (edited 17 January 2001).]

Top
#6268 - 2002-01-08 06:17 PM Re: Retreiving Serial Number
frederiek Offline
Lurker

Registered: 2002-01-08
Posts: 3
Loc: brussels
Hi,

I'm currently looking for dumping the below Dellinfo into the registy. I'm able to pipe this information into a textfile, but i don't see to manage to read from the textfile the info to dump it into the registry? I was wondering if somebody has any idea's on doing this?

TIA

Fre
DELLINFO.EXE v0.92. Copyright Dell Computer Corporation 1999
System Vendor .... Dell Computer Corporation
Product Name ..... OptiPlex GX110
Dell System ID ... 00B4
BIOS Version ..... A05
BIOS Date ........ 09/18/2000
Service Tag ...... C6BL20J
Asset Tag ........

Top
#6269 - 2002-01-08 07:02 PM Re: Retreiving Serial Number
Will Hetrick Offline
Hey THIS is FUN

Registered: 2001-10-02
Posts: 320
Loc: Harrisburg, PA USA
FRE,
What are you using to pull the info to a text file?
_________________________
You have at least 2 choices. Each choice changes your destiny. Choose wisely!

Top
#6270 - 2002-01-09 07:42 AM Re: Retreiving Serial Number
frederiek Offline
Lurker

Registered: 2002-01-08
Posts: 3
Loc: brussels
Hi,


I'm using dellinfo.exe to pull the info into the txt file.

Fre

Top
Page 2 of 2 <12


Moderator:  Jochen, Allen, Radimus, Glenn Barnas, ShaneEP, Ruud van Velsen, Arend_, Mart 
Hop to:
Shout Box

Who's Online
0 registered and 248 anonymous users online.
Newest Members
gespanntleuchten, DaveatAdvanced, Paulo_Alves, UsTaaa, xxJJxx
17864 Registered Users

Generated in 0.058 seconds in which 0.026 seconds were spent on a total of 12 queries. Zlib compression enabled.

Search the board with:
superb Board Search
or try with google:
Google
Web kixtart.org