Dateien suchen in einem bestimmten Zeitraum und Archivbit setzen

@Echo off
setlocal enabledelayedexpansion
set thisyear=%date:~6,4%
dir /a:-d /s /t:c>%TEMP%\archivebit.tmp
for /F "tokens=1 delims=" %%A in (%TEMP%\archivebit.tmp) do (  
	Echo %%A
	call :getDatefromDir %%A
	for /F "tokens=4 delims= " %%B in ('Echo %%A') do (  
		Echo %%B
	)
)

:getDatefromDir
set truedate=0
set "fday="  
set "fmonth="  
set "fyear="  
set got=%1
set fyear=%got:~6,4%
set fmonth=%got:~3,2%
set fday=%got:~0,2%
if NOT defined fday Echo FDAY not defined: %got% && set truedate=0 && goto abort
if NOT defined fmonth Echo FMONTH not defined: %got% && set truedate=0 && goto abort
if NOT defined fyear Echo FYEAR not defined: %got% && set truedate=0 && goto abort
	
if DEFINED fday (
	if NOT "x%fday%"=="x " (  
		if NOT "x%fday%"=="x" (  
			if %fday% GEQ 0 (
				if %fday% LEQ 31 (
					set truedate=1
					Echo DAY - check
				) else (
					set truedate=0
					goto abort
				)
			) else (
				set truedate=0
				goto abort
			)
		) else (
			set truedate=0
			goto abort
		)
	)
)

if DEFINED fmonth (
	if NOT "x%fmonth%"=="x " (  
		if NOT "x%fmonth%"=="x" (  
			if %fmonth% GEQ 0 (
				if %fmonth% LEQ 12 (
					set truedate=1
					Echo MONTH - check
				) else (
					set truedate=0
					goto abort
				)
			) else (
				set truedate=0
				goto abort
			)
		) else (
			set truedate=0
			goto abort
		)
	)
)

if DEFINED fyear (
	if NOT "x%fyear%"=="x " (  
		if NOT "x%fyear%"=="x" (  
			if %fyear% GEQ 0 (
				if %fyear% LEQ %thisyear% (
					set truedate=1
					Echo YEAR - check
				) else (
					set truedate=0
					goto abort
				)
			) else (
				set truedate=0
				goto abort
			)
		) else (
			set truedate=0
			goto abort
		)
	)
)
goto :EOF

:abort
Echo %got%
Echo Genuine: %truedate%
pause>nul
Echo ---------------------
Echo.
goto :EOF