home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / nvpm11.zip / NvPMToWPS.CMD < prev    next >
OS/2 REXX Batch file  |  1996-08-04  |  615b  |  20 lines
  1. /************ File: NvToWPS.CMD **************/
  2. /*                                                       */
  3. /* Purpose: create WPS program object                */
  4. /********************************************/
  5.  
  6. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  7. call SysLoadFuncs
  8.  
  9. SAY "To install NvPM program object please intput full path of the program,"
  10. SAY "for example: C:\OS2\APPS\NVPM.EXE"
  11.  
  12. PARSE PULL ProgPath
  13. EXECNAM="EXENAME=" || ProgPath
  14. rc=SysCreateObject( "WPProgram", "N-Viro PM", "<WP_DESKTOP>", EXECNAM , "Replace" )
  15.  
  16. if rc=1 then say "Success"
  17. else say "Failure"
  18.  
  19. exit
  20.