home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga 12 / MA_Cover_12.iso / internet / cmanager / rexx / sendib.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1998-09-25  |  413 b   |  25 lines
  1. /*
  2.  *      $VER: SendIB.rexx 1.0 (5.8.98)
  3.  */
  4.  
  5. parse arg '"'args'" "'BROWSER'"'
  6. options results
  7.  
  8. if show('P','IBROWSE') then do
  9.           address 'IBROWSE'
  10.           SHOW
  11.           GOTOURL args
  12.           Exit
  13. end
  14.  
  15. ADDRESS COMMAND 'Run ' BROWSER
  16. ADDRESS COMMAND "SYS:RexxC/WaitForPort" 'IBROWSE'
  17.  
  18. if show('P','IBROWSE') then do
  19.           address 'IBROWSE'
  20.           SHOW
  21.           GOTOURL args
  22.           Exit
  23. end
  24.  
  25.