home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 31
/
CDASC_31_1996_juillet_aout.iso
/
vrac_os2
/
hog3142.zip
/
INSTALL.CMD
< prev
Wrap
OS/2 REXX Batch file
|
1996-04-06
|
1KB
|
56 lines
/* INSTALL HOG */
Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
Call SysLoadFuncs
Say "In welches Laufwerk soll installiert werden? (ohne :)"
pull xx
LW=translate(xx)||':'
/* Achtung vollständiger Pfad nötig" */
Say "In welchen Pfad soll installiert werden? (ohne \ am ende)"
pull xx
Path=lw||translate(xx)
testfile=Path||'\HOG3.TST'
x=lineout(testfile,"TEST_HOG3_TMP_FIILE")
x=lineout(testfile) /* Close */
line=linein(testfile)
x=lineout(testfile) /* Close */
if line=="TEST_HOG3_TMP_FIILE" then
do
Say "install ..." Path
'copy' 'HOG3.EXE' Path
'copy' 'HOG3.INF' Path
'copy' 'HOG3OBJ.CMD' Path
xx=Path||"\HOG3.TST"
'del' xx
Say
Say
Say "Dateien ist kopiert"
Say "Soll ein WPS-Objekt angelegt werden ? J/N"
pull xx
xx=translate(xx)
if(xx=="J"|xx=="Y") then
do
Say "Call HOG3OBJ.CMD" Path
call 'HOG3OBJ.CMD' Path
end
end
else
do
Say
Say "Ich kann auf " Path "nicht zugreifen"
Say "Bitte berichtigen bzw. erst einmal anlegen"
end
Say
Say "Bitte ENTER drücken"
pull xx
exit