[megaloman]

Код:

@Echo Off
cls
	Set "BoxArc=Z:\_Auto_Export_AF_DB_\Scripts\Sorting_Files_Info_Folders\AF_DB_Backup"

	FOR /F "tokens=2 delims==." %%d in ('WMIC OS GET LOCALDATETime /VALUE') DO Set "YYYY2=%%d"
	Set /A YYYY2=%YYYY2:~0,4%
	Set /A YYYY1=%YYYY2%-1

	FOR /F "usebackq delims=" %%d In (`2^>nul Dir /B /A:D /S "%BoxArc%"`) DO If Exist "%%d\%%~nxd_??-??-2???_????.zip" (
		FOR /L %%y IN (%YYYY1%,1,%YYYY2%) DO For %%m In (01 02 03 04 05 06 07 08 09 10 11 12) Do (
			If Exist "%%d\%%~nxd_??-%%m-%%y_????.zip" (
				2>nul Md "%%d\%%y\%%m"
				>nul Move "%%d\%%~nxd_??-%%m-%%y_????.zip" "%%d\%%y\%%m\"
			)
		)
	)
pause
Exit /B

Нарисуйте свой путь.

Круто смотрим в будущее. В 2500 не пробовали заглянуть? »

"Народу русскому пределы не поставлены!"
Чтобы не напрягало, сделал просмотр текущего года и предыдущего (актуально в начале года)
Если, как разовая акция и нужно несколько предыдущих лет, то измените
Set /A YYYY1=%YYYY2%-1
-1 на количество предыдущих годов.