Page 2 of 2 <12
Topic Options
#69085 - 2002-08-19 04:33 PM Re: Kix 2.33 script
Lonkero Administrator Offline
KiX Master Guru
*****

Registered: 2001-06-05
Posts: 22346
Loc: OK
what is the actual line of:
run aefdisk /allsize and smbios /g 01 > smbios.txt
_________________________
!

download KiXnet

Top
#69086 - 2002-08-19 04:50 PM Re: Kix 2.33 script
Will Hetrick Offline
Hey THIS is FUN

Registered: 2001-10-02
Posts: 320
Loc: Harrisburg, PA USA
Here is the actual batch file I use.
</font><blockquote><font size="1" face="Verdana, Helvetica, sans-serif">code:</font><hr /><pre style="font-size:x-small; font-family: monospace;">
:kix
cd \
cd bin
Pause

%ramdrv%\bin\aefdisk /numhds
%ramdrv%\bin\aefdisk 1 /allsize
if %numhds% <> 1 %ramdrv%\bin\aefdisk 2 /allsize
%ramdrv%\bin\smbios /g 01 > %ramdrive%\bin\smbios.txt
%ramdrv%\bin\mem.exe > %ramdrive%\bin\mem.txt

net use G: \\image\images
net use H: \\dc01\auditlog
net use i: \\as03\images
net time \\dc01 /set /y

Echo starting the menu system
%ramdrv%\bin\kixtart %ramdrv%\bin\info.kix
%ramdrv%\bin\kixtart %ramdrv%\bin\login.kix


</blockquote><font size="2" face="Verdana, Helvetica, sans-serif">Here is the info.kix file
</font><blockquote><font size="1" face="Verdana, Helvetica, sans-serif">code:</font><hr /><pre style="font-size:x-small; font-family: monospace;">
;===================================
;***** Last Modified on 8/16/2002 at 2:29:41 PM by Whetrick *****
;===================================

$check = 0
If Exist ("q:\bin\smbios.txt")
$RC = Open (1,"q:\bin\smbios.txt")
While $check <> 28
$Check = $check + 1
$X = ReadLine(1)
Loop
$Manu = ReadLine(1)
$Model = ReadLine(1)
$version = ReadLine(1)
$Serial = ReadLine(1)
$RC = Close(1)

$manu = SubStr($manu,26,Len($manu))
$manu = SubStr($manu,1,Len($manu)-1)
Set "manu=$manu"

$model = SubStr($model,26,Len($model))
$model = SubStr($model,1,Len($model)-1)

$version = SubStr($version,26,Len($version))
$version = SubStr($version,1,Len($version)-1)
If $version <> "none"
$model = $model + " " + $version
EndIf
Set "model=$model"

$serial = SubStr($serial,26,Len($serial))
$serial = SubStr($serial,1,Len($serial)-1)
Set "serial=$serial"

EndIf

$Check = 0
If Exist ("q:\bin\mem.txt")
$RC = Open (1,"q:\bin\mem.txt")
While $check <> 8
$Check = $check + 1
$X = ReadLine(1)
Loop
$Mem = ReadLine(1)
$RC = Close(1)

$mem = SubStr($mem,18,10)
Set "mem=$mem"

EndIf

Exit


</blockquote><font size="2" face="Verdana, Helvetica, sans-serif">and the login.kix is the first post.
_________________________
You have at least 2 choices. Each choice changes your destiny. Choose wisely!

Top
Page 2 of 2 <12


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

Who's Online
0 registered and 302 anonymous users online.
Newest Members
Sir_Barrington, batdk82, StuTheCoder, M_Moore, BeeEm
17886 Registered Users

Generated in 0.047 seconds in which 0.022 seconds were spent on a total of 11 queries. Zlib compression enabled.

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