Код:
@Echo Off
cls
Set "Time11=080000"
Set "Time12=235959"
Set "Time21=000000"
Set "Time22=075959"
Set "Out=D:\Dipost\BOXES\Системный ящик\1401"
SetLocal EnableDelayedExpansion
Call :StrDate "yyyy" "mm" "dd" "hhmmss"
Call :FromNow 0 %dd%.%mm%.%yyyy% "yyyyN" "mmN" "ddN"
Call :FromNow -1 %dd%.%mm%.%yyyy% "yyyyY" "mmY" "ddY"
If 1%Time11% LEQ 1%hhmmss% If 1%hhmmss% LEQ 1%Time12% (
Echo Move "TraLaLa\%yyyyN%\%mmN%\%ddN%\Маска_файлов" "%Out%\"
)
If 1%Time21% LEQ 1%hhmmss% If 1%hhmmss% LEQ 1%Time22% (
Echo Move "TraLaLa\%yyyyY%\%mmY%\%ddY%\Маска_файлов" "%Out%\"
)
pause
GoTo :Eof
:StrDate
FOR /F "tokens=2 delims==." %%d in ('WMIC OS GET LOCALDATETIME /VALUE') DO SET "@Tdate=%%d"
Set "%~1=%@Tdate:~0,4%"
Set "%~2=%@Tdate:~4,2%"
Set "%~3=%@Tdate:~6,2%"
Set "%~4=%@Tdate:~8,6%"
GoTo :Eof
:FromNow
rem Пересчет даты на заданное кол-во дней
rem Формат даты dd.mm.yyyy +- дни получим новые yyyymmdd
rem Заимствовано http://forum.oszone.net/thread-186889.html
rem вызов Call :FromNow %DeltaDay% %Date% "yyyy" "mm" "dd"
rem результат в перемменной %yyyy% %mm% %dd%
SetLocal
Set DT=%2
Set yyyy=%DT:~-4%& set /a mm=100%DT:~3,2%%%100& set /a dd=100%DT:~,2%%%100
Set /A JD=%~1+dd-32075+1461*(yyyy+4800+(mm-14)/12)/4+367*(mm-2-(mm-14)/12*12)/12-3*((yyyy+4900+(mm-14)/12)/100)/4
Set /A L=JD+68569,N=4*L/146097,L=L-(146097*N+3)/4,I=4000*(L+1)/1461001
Set /A L=L-1461*I/4+31,J=80*L/2447,K=L-2447*J/80,L=J/11
Set /A J=J+2-12*L,I=100*(N-49)+I+L
Set /A yyyy=I,mm=100+J,dd=100+K
EndLocal &(Set %~3=%yyyy%&Set %~4=%mm:~-2%&Set %~5=%dd:~-2%)
GoTo :Eof
