Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Contributor


Сообщения: 2735
Благодарности: 1699

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
@Echo Off
cls

Set "BoxIn=Z:\Data"

Set "MDir=*_logs"
Set "MFil=*.log"

Set Arc="C:\Program Files\7-Zip\7z.exe" a -tzip -sdel

FOR /F "usebackq delims=" %%d IN (`Dir "%BoxIn%\%MDir%" /S /B /A:D 2^>nul`) DO (
	FOR /F "usebackq delims=" %%f IN (`Dir "%%d\%MFil%" /B /A:-D /O-D /T:C 2^>nul`) DO Call :ArcOut "%%d\%%f"
)

pause
GoTo :Eof

:ArcOut
        FOR /F "tokens=1 delims= " %%i IN ("%~t1") DO Set TFile=%%i
        If "%TFile%"=="%Date%" GoTo :Eof
	%Arc% "%~dp1%TFile:~-4%" %1
В формате отображения даты, прописанном в системе, год должен быть в формате ГГГГ и быть последним

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Последний раз редактировалось megaloman, 21-03-2017 в 10:26.

Это сообщение посчитали полезным следующие участники:

Отправлено: 09:43, 21-03-2017 | #5