home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / os2clu02.zip / BIN / DelTree.CMD < prev    next >
OS/2 REXX Batch file  |  1999-08-31  |  793b  |  27 lines
  1. /*
  2.  *  ************************************************************************
  3.  *                          OS/2 Command-Line Utilities
  4.  *  (c) Copyright 1991-1999 Jonathan de Boyne Pollard.  All Rights Reserved.
  5.  *  ************************************************************************
  6.  */
  7.  
  8. /* "@(#)DELTREE.CMD version 1.02" */
  9.  
  10. '@echo off'
  11.  
  12. call RxFuncAdd 'SysGetMessage','RexxUtil','SysGetMessage'
  13.  
  14. usage = "Usage: DELTREE [/A[[+|-]rash]] [/EWFQNU[-|+]] Filenames ..."
  15. copyr = "Copyright (c) 1998-1999 Jonathan de Boyne Pollard.  All Rights Reserved."
  16.  
  17. parse arg line
  18.  
  19. select
  20.     when line == '/?' then
  21.         say SysGetMessage(51, "CLUH.MSG", copyr, usage)
  22.     when line \== '' then
  23.         address 'CMD' 'xdel /sxz '||line
  24.     otherwise
  25.         say SysGetMessage(4, "CLU.MSG", usage)
  26. end
  27.