Удаляет старый файлы если в папке больше n файлов
@echo off
setlocal enableextensions enabledelayedexpansion
rem ---папка для очистки;
set sFolder=F:\Архив1С\БАЗЫ\БитФинанс\Backups
rem iCount - число полных оставляемых бэкапов
set /a "iCount=14"
rem префикс полного бэкапа
set "Pref=bitFinance_full_"
rem расширение полного бэкапа
set "Ext=.bak"
Set /a N=%iCount%-1
Set File=""
for /f "skip=%N% usebackq delims=" %%i in (`dir /b /a:-d /o:-d /t:w "%sFolder%\%Pref%*%Ext%"`) do (
Set File=%%i
GoTo :Continue
)
:Continue
Set "L=0"
for /f "usebackq delims=" %%i in (`dir /b /a:-d /o:-d /t:w "%sFolder%"`) do (
If !L!==1 del /f /q "%sFolder%\%%i"
If "%%i"=="%File%" Set "L=1"
)
