home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1997 November / PCO1197.ISO / FilesBBS / OS2 / IJB20OS2.ARJ / IJB20OS2.ZIP / bin / install.cmd next >
Encoding:
Text File  |  1997-09-24  |  599 b   |  15 lines
  1. /* Rexx */
  2. IF RxFuncQuery('SysLoadFuncs') THEN DO
  3.    CALL RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  4.    CALL SysLoadFuncs
  5. END
  6.  
  7. call SysFileTree "JUNKBUST.EXE", File,"FO"
  8. if file.0>0 then
  9.   Exename="junkbust.exe"  /* only found on a fat-drive */
  10. else
  11.   Exename="junkbuster.exe" /* assume hpfs-drive */
  12.  
  13. rc = SysCreateObject("WPProgram","OS/2 Junkbuster 2.0","<WP_DESKTOP>", "EXENAME=" || Directory() || "\" || exename || ";PROGTYPE=WINDOWABLEVIO;HELPPANEL=8010;CCVIEW=YES;STARTUPDIR="||directory()||"\..\config;PARAMETERS=config.ijb;OBJECTID=<JUNKBUSTER>;MINIMIZED=YES","R")
  14.  
  15.