请问如何用批处理命令删除非当天的文档？

@echo off
SetLocal EnableDelayedExpansion
for /f "tokens=1 delims= " %%i in ('echo %date%') do set date=%%i
echo %date%
echo 正在搜索不是当前日期的文件..
set n=0
for /f "delims=" %%i in ('dir /b ') do (
for /f "tokens=1 delims= " %%j in ('echo %%~ti') do (
set /a n+=1
if not "%%j"=="!date!" echo !n!个文件: "%%i" && del "%%i"
)
)
echo !a4!

pause >Nul
只对当前目录有效

@echo off
SetLocal EnableDelayedExpansion
set temp1=%date:~0,4%%date:~5,2%%date:~8,2%
set temp2=1
set YE=%temp1:~0,4%
set MO=%temp1:~4,2%
set DA=%temp1:~6,2%
set DG=%temp2%
set/a vY1=%YE% %% 400
set/a vY2=%YE% %% 4
set/a vY3=%YE% %% 100
if %vY1%==0 (set var=true) else (
if %vY2%==0 (
if %vY3%==0 (set var=false) else (set