home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 3 Comm / 03-Comm.zip / scrmod.zip / RENAME.SCR < prev    next >
Text File  |  1992-02-12  |  766b  |  23 lines
  1. > windowshow()
  2. > watch(on)
  3. > copy ('c:\config.sys','c:\copy.001',replace)
  4. > copy ('c:\config.sys','c:\copy.002',replace)
  5. > copy ('c:\config.sys','c:\copy.003',replace)
  6. > copy ('c:\config.sys','c:\copy.004',replace)
  7. > copy ('c:\config.sys','c:\copy.005',replace)
  8. > delete('c:\rename.99*')
  9. > result1 = rename ('c:\copy.00*','c:\rename.99*')
  10. > result1text = valtostr(result1)
  11. > result2 = rename ('c:\copy.00*','c:\rename.99*')
  12. > result2text = valtostr(result2)
  13. > result3 = rename ('c:\rename.99*','c:\CONFIG.SYS')
  14. > result3text = valtostr(result3)
  15. > watch(off)
  16. > message('1st rename result = ' + result1text)
  17. > message('2nd rename result = ' + result2text)
  18. > message('3rd rename result = ' + result3text)
  19. > watch(on)
  20. > timeout = 0
  21. > wait()
  22. > end
  23.