home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / EXIST < prev    next >
Text File  |  1991-08-16  |  346b  |  15 lines
  1. > watch(on)
  2. > result1 = exist ('c:\3m\exe\en\os2\softerm.exe')
  3. > result1text = valtostr(result1)
  4. > result2 = exist ('c:\3m\exe\en\os2\softerm.123')
  5. > result2text = valtostr(result2)
  6. > watch(off)
  7. > message('1st exist result = ' + result1text)
  8. > message('2nd exist result = ' + result2text)
  9. > watch(on)
  10. > timeout = 0
  11. > wait()
  12. > end
  13.  
  14.  
  15.