((Listing zur Installationsstapeldatei fⁿr Windows-Programme. Etwa unter WI.BAT speichern und aufrufen. Protokolliert alle VerΣnderungen an SYSTEM.INI und WIN.INI auf dem Drucker mit. Die Protokolle k÷nnen spΣter helfen, ein Programm restlos von der Platte zu fegen.))
@echo off
cls
echo ***********************************
echo * W I N - I N S T A L L *
echo * Version 1.0 *
echo * Tool zur einfachen Installation *
echo * von Windows-Applikationen *
echo * Detlef K÷nig 1994 *
echo ***********************************
echo .
REM ------------------------------------
REM Abfangen von Fehlern bei der Eingabe
if .%1==. goto help1
if .%2==. goto help2
REM ------------------------------------
echo Bitte beachten Sie:
echo .
echo 1. Die Installationsdiskette(n)
echo bereithalten
echo 2. Der Drucker muß angeschaltet und
echo online sein
echo .
pause
cls
REM -------------------------------------
REM Kopieren von WIN.INI und REM SYSTEM.INI REM in WIN.ORG und SYSTEM.ORG.
REM -------------------------------------
copy \windows\system.ini \windows\system.org
copy \windows\win.ini \windows\win.org
echo Windows wird gestartet und Installation beginnt
echo .
echo ***********************************
echo * Wichtig !!! *
echo * *
echo * Bitte nach Abschluß der *
echo * Installation Windows verlassen. *
echo ***********************************
REM ------------------------------------
REM Suche nach Installationsdatei
REM ------------------------------------
if not exist %1:install.exe goto setupexe
win : %1:install.exe
goto vergleich
:setupexe
if not exist %1:setup.exe goto instcom
win : %1:setup.exe
goto vergleich
:instcom
if not exist %1:install.com goto setupcom
win : %1:install.com
goto vergleich
:setupcom
if not exist %1:setup.com goto fehler
win : %1:setup.com
goto vergleich
REM ---------------------------------
REM Fehlermeldung, wenn keines der
REM Installationsprogramme
REM gefunden werden konnte.
REM Die Meldung kann vermieden werden,
REM indem der Name des
REM Programmes nach o.a. Muster in die
REM Liste aufgenommen wird.
REM ---------------------------------
:fehler
cls
echo **********************************
echo * WIN-INSTALL hat kein *
echo * Installationsprogramm gefunden *
echo **********************************
goto ende
REM -----------------------------------
REM Vergleich der ursprünglichen WIN.INI
REM und SYSTEM.INI mit den
REM neuen Versionen und Ausgabe der Vergleichsergebnisse auf Drucker.
REM -----------------------------------
:Vergleich
cls
echo .
echo Hier ist wieder WIN-INSTALL.
echo Erinnern Sie sich, Sie haben doch
echo vorhin das Programm %2 installiert!
echo .
echo Ist der Drucker eingeschaltet und
echo online?
echo .
pause
cls
echo ***********************************
echo * Vergleiche WIN.INI und SYSTEM.INI
echo * mit den vorherigen. Ausgabe der
echo * Änderungen erfolgt auf den Drucker!
echo * Ausdruck bitte aufbewahren!
echo ***********************************
pause
cd \windows
echo Veränderungen von WIN.INI und > prn
echo SYSTEM.INI durch Installation von >prn
echo %2 > prn
fc win.ini win.org > prn
fc system.ini system.org > prn
REM -------------------------------
REM Löschen der Sicherungskopien
REM -------------------------------
del win.org
del system.org
cd\
echo .
echo Vergleich beendet
REM ---------------------------------
REM Hilfstexte bei Fehlern in der Eingabesyntax
REM ---------------------------------
:help1
cls
echo **************************************
echo * Eingabesyntax ist: *
echo * (Laufwerk ohne Doppelpunkt) *
echo * WI [Quell-Laufwerk] [Applikation] *
echo * Beispiel: *
echo * WI A MS-Word *
echo **************************************
goto ende
:help2
cls
echo **************************************
echo * Kein Applikationsname angegeben *
echo **************************************
:ende
((Listing zur komfortablen Dateiauswahlbox unter Winword 2.0 oder 6.0. Hinter verstΣndlichen Namen wie "Meine Texte" oder "Briefverkehr" k÷nnen sich irgendwelche Pfade verbergen. Mit einem Klick wechselt Winword in dieses Verzeichnis. Das Durchhangeln durch den Verzeichnisbaum ist somit nicht notwendig.))
