home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / SEND.SCR < prev    next >
Text File  |  1992-02-06  |  538b  |  22 lines
  1. > windowshow()
  2. > watch(on)
  3. > cd ('..\')
  4. > logfile='send.log'
  5. > delete(logfile)
  6. > log(logfile)
  7. > protocol = 'Xmodem'
  8. > pcfilename = 'osfp.dll'
  9. > hostcmd = 'xrcv -osfp.xmd' + valtochr(13) + valtochr(10)
  10. > send(protocol,pcfilename,,hostcmd,on)
  11. > protocol = 'Kermit'
  12. > pcfilename = '*.dll'
  13. > hostfilename = '*.kmt'
  14. > hostcmd = 'delete ' + hostfilename + valtochr(13) + valtochr(10)
  15. > send(protocol,pcfilename,hostfilename,hostcmd,on)
  16. > message ('Press any to terminate script')
  17. > watch(off)
  18. > timeout = 0
  19. > wait()
  20. > end
  21.  
  22.