home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / postroad.zip / install.cmd < prev    next >
OS/2 REXX Batch file  |  1997-10-23  |  1KB  |  48 lines
  1. /* To place a PRM program object onto the OS/2 Desktop */
  2.  
  3. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  4. signal on syntax name NoREXX
  5. call SysLoadFuncs
  6. signal off syntax
  7. signal on halt
  8. '@echo off'
  9.  
  10. parse source temp
  11. parse var temp . . temp
  12. temp=reverse(temp)
  13. parse var temp . "\" temp
  14. source=reverse(temp)
  15. if stream(source'\postroad.exe','c','query exists')='' then do
  16.    say
  17.    say "Install.cmd and Postroad.exe must be together in the same directory."
  18.    exit
  19. end
  20.  
  21. class='WPProgram'
  22. title='Post Road^Mailer'
  23. loc='<WP_DESKTOP>'
  24. strings='ObjectID=<PostRoadMailer>;'
  25. strings=strings||'ExeName='source'\POSTROAD.EXE;'
  26. strings=strings||'StartUpDir='source';'
  27. strings=strings||'IconFile='source'\POSTROAD.ICO;'
  28. call SysCreateObject class,title,loc,strings,'U'
  29. say ""
  30. say "Installation complete.  Doubleclick on the new Desktop"
  31. say "object or type POSTROAD, while in the" source
  32. say "directory, to start the Post Road Mailer."
  33. say ""
  34. exit
  35.  
  36. Halt:
  37. say ''
  38. say 'INSTALL interrupted by Ctrl-C.'
  39. say ''
  40. exit
  41.  
  42. NoREXX:
  43. say ''
  44. say 'Unable to load the REXXUtil functions. Either the REXXUTIL.DLL file is not'
  45. say 'on the LIBPATH or REXX support is not installed on this system.'
  46. say ''
  47. exit
  48.