Резервное копирование файла

@Echo Off
SetLocal EnableDelayedExpansion
:: ЧТО и КУДА копируем, сколько храним
:: $OLD - КОЛИЧЕСТВО хранимых архивов
Set $SRC=D:\Kadry\data
Set $DST=F:\Backup\oks
Set $OLD=6
:: Находим текущие день/месяц/год
For /F "Tokens=1 Delims=." %%i In ('WMIC OS Get LocalDateTime^|Find "."') Do Set $Time=%%i
Set $Y=%$Time:~0,4%&Set $M=0%$Time:~4,2%&Set $D=0%$Time:~6,2%
Set $M=%$M:~-2%&Set $D=%$D:~-2%
:: Создаем каталог/делаем архив
XCopy /S/E/D/C/Q %$SRC%\* %$DST%\%$D%.%$M%.%$Y:~-2%\
:: Ограничиваем количество архивов
For /F "Delims=" %%i In ('DIR /B/O:-D/A:D %$DST%\??.??.??') Do (
   Set /A $OLD-=1
   If !$OLD! LSS 0 RD /S/Q "%$DST%\%%i"
)

@echo off
set "sPathFile=C:\1.txt"
 
for /f "tokens=1* delims==" %%a in ('"wmic path win32_localtime get Day,Month,Year /value|find "^=""') do set "%%a=0%%b"
7z.exe a "%Day:~-3%.%Month:~-3%.%Year:~-3%.7z" "%sPathFile%"
pause

@echo off
SetLocal EnableDelayedExpansion
 
Set "$SRC=D:\Kadry\data\1.txt"
Set "$DST=F:\Backup\oks"
Set $OLD=6
 
for /f "tokens=1* delims==" %%a in ('"wmic path win32_localtime get Day,Month,Year /value|find "^=""') do set "%%a=0%%b"
7z.exe a "%$DST%\%Day:~-3%.%Month:~-3%.%Year:~-3%.7z" "%$SRC%"
:: ...
pause