home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / COPY < prev    next >
Text File  |  1991-09-27  |  554b  |  19 lines
  1. > watch(on)
  2. > delete ('c:\copy.fil')
  3. > result1 = copy ('c:\3m\exe\en\os2\softerm.exe','c:\copy.fil',fail)
  4. > result1text = valtostr(result1)
  5. > result2 = copy ('c:\3m\exe\en\os2\softerm.exe','c:\copy.fil',fail)
  6. > result2text = valtostr(result2)
  7. > result3 = copy ('c:\3m\exe\en\os2\abc.def','c:\copy.fil',fail)
  8. > result3text = valtostr(result3)
  9. > watch(off)
  10. > message('1st copy result = ' + result1text)
  11. > message('2nd copy result = ' + result2text)
  12. > message('3rd copy result = ' + result3text)
  13. > watch(on)
  14. > timeout = 0
  15. > wait()
  16. > end
  17.  
  18.  
  19.