пятница, 21 декабря 2007 г.

SCRIPT Оставить только 5 файлов, всё остальное удалить

Оставить только 5 файлов, всё остальное удалить:

::== keep5.bat
@echo off
setLocal EnableDelayedExpansion

for /f "tokens=* delims=" %%A in ('dir backup* /b/a-d/o-d') do (
set /a kept+=1
echo !kept!
if !kept! geq 5 call :sub1 %%A
)
goto :eof

:sub1
rem echo del "%*"
del "%*"
goto :eof
:: DONE