TIP: Click on subject to list as thread! ANSI
echo: 4dos
to: Alle
from: Ralf Brinkmann
date: 2004-05-30 14:05:56
subject: Change batch commands

Hi friends!

What must I change in the following batch, so that it will run as well
under 4DOS 7.5 and under the new 4NT?

:: RMR.BTM
:: Remove Recursive - Selektierte Unterverzeichnisse komplett löschen
:: In hartnaeckigen Faellen hilft 'rmr /z'

:: Geschrieben von Jürgen Loh, 2:2447/203, 21:100/4714
:: Nichtkommerzielle Nutzung und Verbreitung ist erwünscht.

select `set _rmr=(*.*) ^ gosub _rmr`
set _rmr=
quit

:_rmr
   if "%_rmr" eq "" goto help
   if %{at}truename[%_rmr] eq %{at}truename[.] goto help
   if %{at}truename[%_rmr] eq %{at}truename[..] goto help
   iff isdir %_rmr then
      echo Removing %_rmr...
      del %_rmr /s/x/y/q %1&
   else
      echo Deleting %_rmr...
      del %_rmr /q %1&
   endiff
   return
:help
   echo Can't remove %_rmr
return

Regards, Ralf

--- GEcho/32 1.20/Pro
* Origin: Police Academy: 49-611-1860516 * 24 h ZyX+V90+ISDN+Fax (2:244/2122)
SEEN-BY: 633/267 270
@PATH: 244/2122 1200 2432/200 774/605 123/500 106/2000 633/267

SOURCE: echomail via fidonet.ozzmosis.com

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.