Here is the file:

it name is @WKSTA+MODEL.txt

Structure: System Information (Type 1), Next Handle: 02h (2t)
Type: 1
Length: 19h
Handle: 0001h (1t)
Manufacturer: 'IBM'
Product Name: '6574A3U'
Version: (none)
Serial Number: '78PXFK1'
UUID:
0000h : 44 DC AF 29 C8 FF 22 12-87 BE 23 BE 69 39 1F 90 Dܯ)Èÿ" ‡¾#¾i9 �
Wake-up Type: Power Switch

I need to search for:

Manufacturer:
Product Name:
Serial Number:

I would like to search the file for each set a varable then log that varable. I do not care if the whole line is set to a varable. I would hope to search for Manufacture and the varable be set to IBM but if I get Manufacturer: 'IBM' no worries at all

Could you give me an easy way to accomplish this. Many thanks

I have used the FIND command to send this info to a temp file then try to get KIX to merge the files together into one file but that is not productive.

Here is a copy of the entire file that is created the text may not be on the same line each time this file is created.

SMBIOS (aka DMIBIOS) Version 2.3.1 (Build 40) Display Utility - Apr 17 2000
----------------------------------------------------------------------------
The following software is copyrighted material of the IBM Corporation and
is provided AS IS without warranty of any kind, either express or implied,
including but not limited to the implied warranties of merchantability and
fitness for a particular purpose. The entire risk arising out of the use
of performance of this software and related documentation remains with you.
In no event will IBM be liable for any lost profits, lost savings,
incidental or indirect damages or other economic consequential damages,
even if IBM is advised of the possibility of such damages. IBM will not be
liable for any damages based on any third party claim.
IBM grants you a nonexclusive, royalty free license to make unlimited
copies, make derivative works or otherwise use the software for any
purpose, without accounting to IBM. The software is made available by
IBM, without fee, to assist the user in comparing code with respect to
the System Management BIOS Reference Specification, but IBM makes no
representation as to its completeness or accuracy and any conclusions
regarding conformity to the specification are the responsibility of the
user. Your use of the software signifies your acceptance of these terms.
If you do not accept these terms, you are not licensed to use the software
or download it to your machine.
----------------------------------------------------------------------------
Send comments/bugs to smbcheck@us.ibm.com.
DMI BIOS Function 51h, Get DMI Structure (Return code: 00h - Success)
Structure: System Information (Type 1), Next Handle: 02h (2t)
Type: 1
Length: 19h
Handle: 0001h (1t)
Manufacturer: 'IBM'
Product Name: '6574A3U'
Version: (none)
Serial Number: '78PXFK1'
UUID:
0000h : 44 DC AF 29 C8 FF 22 12-87 BE 23 BE 69 39 1F 90 Dܯ)Èÿ" ‡¾#¾i9 �
Wake-up Type: Power Switch

could you just do a plain-old file scan and parse the records out ? like this:

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

-Shawn

[ 12 December 2001: Message edited by: Shawn ]

E:\Amic>kix32 -d Amic.kix.txt
Script error : error in parameter(s) !.
$mfr = substr($line,instr($line,"'")+1)

Here is the script:

;Insure Network shares has write access for Users to AMIC Path
;set varables
$AMICPath = "\\bcgdist01\docs$\amic\"
$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"

;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

;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)
$mfr = substr($mfr,1,len($mfr)-1)
?"mfr=" $mfr
GOSUB LOG
$LogText = "Manufacture: " + $mfr
case instr($line,"Product Name:")
$prd = substr($line,instr($line,"'")+1)
$prd = substr($prd,1,len($prd)-1)
?"prd=" $prd
GOSUB LOG
$LogText = "Model Number: " + $prd
case instr($line,"Serial Number:")
$sn = substr($line,instr($line,"'")+1)
$sn = substr($sn,1,len($sn)-1)
?"sn=" $sn
GOSUB LOG
$LogText = "Serial Number: " + $sn
case 1
endselect
endif
$line=readline(1)
loop
$=close(1)
endif

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

-Shawn

change the lines:

$mfr = substr($line,instr($line,"'")+1)

$prd = substr($line,instr($line,"'")+1)

$sn = substr($line,instr($line,"'")+1)

to

$mfr = substr($line,instr($line,"'")+1,len($line))

$prd = substr($line,instr($line,"'")+1,len($line))

$sn = substr($line,instr($line,"'")+1,len($line))

[ 12 December 2001: Message edited by: DrillSergeant ]

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!!!!!!

The smbios 2.3 (build 30) version works also on other computers.
This version is available on our site http://home.wanadoo.nl/scripting
greetings.

Can you send a copy of your SMBIOS (build 40) version.
Our email address is: scripting@wanadoo.nl
Searching on the ibm site doesn't give a good result.
thanks & greetings.

MCA
Please take two and call me in the morning. I think you should feel all better now with this perscription.

SMBIOS -- Version 1.10
(C) Copyright 2000-2001 Qualitas, Inc. All rights reserved. http://www.voodoofiles.com/3836 http://www.voodoofiles.com/getit.asp?id=3836&g=1&d=13&s=139127350

SMBIOS (aka DMIBIOS) Version 2.3.1 (Build 40) Display Utility - Jun 15 2000 http://www.ibm.com/products/surepath/other/smbios.html http://www.ibm.com/products/surepath/documents/smbios2.exe

Thanks for the links.
greetings.

readers info:

we recently find problems with SMBIOS and Compaq Presario with Windows XP.
SMBIOS creates enormous files and we must abort the program to finish the
process.
before using it in your environment verify SMBIOS. it runs also on other
PC manufactories.