Remove SMS 1.2 from Windows 9x
;
; Kix-script that removes MS-SMS 1.2 from Windows 9x
; Brian Petersen, 30.11.1999
;
break on
; Checks if it is a Win9x...
If @INWIN = 1
goto WinNT
endif
if @INWIN = 2
goto Win9x
endif
:Win9x
SHELL "%COMSPEC% /C deltree /y C:\MS\SMS\Bin"
SHELL "%COMSPEC% /C deltree /y C:\MS\SMS\Data"
SHELL "%COMSPEC% /C deltree /y C:\MS\SMS\Idmifs"
SHELL "%COMSPEC% /C deltree /y C:\MS\SMS\Invdata"
SHELL "%COMSPEC% /C deltree /y C:\MS\SMS\Logs"
SHELL "%COMSPEC% /C deltree /y C:\MS\SMS\Temp"
SHELL "%COMSPEC% /C attrib -h C:\SMS.INI"
SHELL "%COMSPEC% /C del C:\SMS.INI"
$vaerdi = ReadProfileString("c:\windows\win.ini","Windows","load")
; We want to delete smsrun16 from win.ini, but not MS-Outlook ProfGen...
$medProfGen = "C:\temp\profgen.exe C:\MS\SMS\BIN\smsrun16.exe"
$udenProfGen ="C:\MS\SMS\BIN\smsrun16.exe"
if $vaerdi = $medProfGen
WriteProfileString( "c:\windows\win.ini","Windows","load", "c:\temp\profgen.exe")
endif
if $vaerdi = $udenProfGen
WriteProfileString( "c:\windows\win.ini","Windows","load", " ")
endif
:WinNT
; If it is a Windows NT we just exits...
Exit
|