Код:
@Echo Off
SetLocal EnableExtensions EnableDelayedExpansion
Set "In=E:\Delete\1"
Set "Out=E:\Delete\Out"
Set "Mask=i??_?????_?_?_??????.txt"
FOR %%f IN ("%In%\%Mask%") DO (
Set "Name=%%~nf"
Set "Dt=!Name:~-6!
rem Если надо иметь наименования папок в формате ГГММДД cледующую строку закомментировать или удалить
Set "Dt=!Dt:~4,2!!Dt:~2,2!!Dt:~0,2!"
If Not Exist "%Out%\!Dt!" Md "%Out%\!Dt!"
Move /Y "%%f" "%Out%\!Dt!\" >nul 2>nul
)
