home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 2 BBS / 02-BBS.zip / gpm108b.zip / Utils / BsyKill.CMD next >
OS/2 REXX Batch file  |  1998-12-13  |  493b  |  21 lines

  1. /* ü«í¿¬ ñ½∩ »p¿í¿óá¡¿∩ íº¿ΦѬ ó áπΓíáπ¡ñÑ */
  2.  
  3. Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil',  'SysLoadFuncs'
  4. Call SysLoadFuncs
  5.  
  6. spec='M:\Files\*SY' /* èáΓὫú, ó ¬«Γ«p«¼ ½ÑªáΓ óßÑ áπΓíáπ¡ñδ */
  7.  
  8. say 'BsyKill v1.0.beta2 - busy flags killer. 14.12.1998.'
  9. say 'Written by Igor Vanin, 2:5030/448@fidonet, 55:1055/1@general.'
  10. say
  11.  
  12. call SysFileTree spec,fdata,'FSO'
  13.  
  14. say 'Found 'fdata.0' busy flags'
  15. say
  16.  
  17. do c=1 to fdata.0
  18.    say 'Removing 'fdata.c
  19.    call SysFileDelete fdata.c
  20. end
  21.