home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 6 / AACD06.ISO / AACD / Programming / MailingLists < prev    next >
Text File  |  1999-10-03  |  382b  |  19 lines
  1. /* */
  2.  
  3. options results
  4. address command    
  5. call pragma('D',':')
  6. CDName = pragma('D')
  7. if ~show('P','AWEB.1') then do
  8.     'Run >NIL: 'CDName'AACD/WebSites/AWeb3/AWebDemo Welcome.html LOCAL CONFIG Amigactive'
  9.     do i = 1 to 3
  10.         'waitforport AWEB.1'
  11.         end
  12.     end
  13.  
  14. address AWEB.1
  15. 'screentofront'
  16. 'wait all'
  17. 'open file://localhost/'CDName'AACD/WebSites/MailingLists/menu.html target title reload'
  18.  
  19.