What I have done is read the BIOS Info and send it to a file for SQL to read for inventoring over 5600 PC in this enviroment. You need the SMBIOS utility also from IBM @ http://www.ibm.com/support/surepath

If any one would like to clean it up, I would welcome it. I would like it to be as fast as possible.

It works and the final code is:
;Insure Network shares has write access for Users to AMIC Path
;set varables
$AMICPath = "SERVERPATH"
$AMICFile = @WKSTA + "-AMIC.txt"
$AMICLog = $AMICPath + $AMICFile
$BIOSFile = $AMICPath + @WKSTA + "-BIOS.TXT"
$BIOSLocal = "%TEMP%\@WKSTA-BIOS.txt"
;CLEAN-UP
del $AMICLOG

;copy SMBIOS2 to Local System
IF EXIST (%temp%\SMBIOS2.EXE)
GOTO BIOS
ELSE
Copy $AMICPath + "SMBIOS2.EXE" %temp% + "\SMBIOS2.EXE"
GOTO BIOS
ENDIF

:BIOS
;Run Bios capture Utiltiy
;Write Bios info --> SMBIOS2 /h for info
SHELL "%COMSPEC% /E:1024 /C " +%TEMP% + "\SMBIOS2.EXE /g 1 > $BIOSLocal"
SHELL "%COMSPEC% /E:1024 /C " +%TEMP% + "\SMBIOS2.EXE /a > $BIOSFile"
;Parse BIOS LOG File to AMIC File

if open(1,"$BIOSLocal") = 0
$line = readline(1)
while @error=0
if $line
select
case instr($line,"Manufacturer:")
$mfr = substr($line,instr($line,"'")+1,len($line))
$mfr = substr($mfr,1,len($mfr)-1)
?"mfr=" + $mfr
case instr($line,"Product Name:")
$prd = substr($line,instr($line,"'")+1,len($line))
$prd = substr($prd,1,len($prd)-1)
?"prd=" + $prd
case instr($line,"Serial Number:")
$sn = substr($line,instr($line,"'")+1,len($line))
$sn = substr($sn,1,len($sn)-1)
?"sn=" + $sn
case 1
endselect
endif
$line=readline(1)
loop
$=close(1)
endif

;Log Events to Amic Log
$LogFile = $AMICLog
$LogText = "Asset Tag#: "+ @WKSTA
GOSUB LOG
$LogText = "FullName: " + @FULLNAME
GOSUB LOG
$LogText = "Cubicle#: "
GOSUB LOG
$LogText = "Site: "+ $site
GOSUB LOG
$LogText = "MAC: " + @ADDRESS
GOSUB LOG
$LogText = "User ID: " + @USERID
GOSUB LOG
$LogText = "Date: Captured: " + @DATE
;BIOS INFO
GOSUB LOG
$LogText = "Manufacturer: " + $mfr
GOSUB LOG
$LogText = "Model Number: " + $prd
GOSUB LOG
$LogText = "Serial Number: " + $sn

:LOG
$Dummy = REDIRECTOUTPUT( $LogFile, 0 )
? $LogText
$Dummy = REDIRECTOUTPUT( "" )
RETURN

THANKS A MILLION!!!!!!