home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 8 Other
/
08-Other.zip
/
mkey110.zip
/
Install.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1997-05-18
|
1KB
|
33 lines
/* REXX */
CALL RxFuncAdd "SysLoadFuncs","REXXUTIL","SysLoadFuncs"
CALL SysLoadFuncs
sourceDir = directory()
/* Delete old objects !!! */
ba=SysDestroyObject( '<MKeySA>' );
ba=SysDestroyObject( '<MKeyClt>' );
ba=SysDestroyObject( '<MKeySvr>' );
ba=SysDestroyObject( '<MKeyManule>' );
/* Create new objects ! */
ba = SysCreateObject( "WPFolder", "MKey Folder", "<WP_DESKTOP>",,
"OBJECTID=<MKeyFolder>")
ba = SysCreateObject( "WPProgram", "MKey/2", "<MKeyFolder>" ,,
"EXENAME="||sourceDir||"\MKEY.EXE;OBJECTID=<MKeySA>;STARTUPDIR="||sourceDir||"" )
/* This version does not include a server/client !!!!
ba = SysCreateObject( "WPProgram", "MKey/2 Client", "<MKeyFolder>" ,,
"EXENAME="||sourceDir||"\MKEYClt.EXE;OBJECTID=<MKeyClt>;STARTUPDIR="||sourceDir||"" )
ba = SysCreateObject( "WPProgram", "MKey/2 Server", "<MKeyFolder>" ,,
"EXENAME="||sourceDir||"\MKEYSvr.EXE;OBJECTID=<MKeySvr>;STARTUPDIR="||sourceDir||"" )
*/
ba = SysCreateObject( "WPProgram", "Manual", "<MKeyFolder>" ,,
"EXENAME=view.exe;OBJECTID=<MKeyManule>;STARTUPDIR="||sourceDir||";PARAMETERS=Manual.inf" )