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

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

Ветеран


Contributor


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

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


pinguindell, Посредством бесплатного архиватора 7Z (имя файла и путь укажите свои,
при наличии в именах файла/папок кириллицы озаботьтесь сохранить скрипт в 866 кодировке)
Код: Выделить весь код
@Echo Off
        Set "FileIn=Z:\Box_In\Вязкость.png"
	Set "BoxArc=Z:\Box_Arc"
	
	Call :Arc "%FileIn%" "%BoxArc%"
Exit /B

:Arc
	If Not Exist %1 (Echo File %1 not found &Exit /B 2)
	If Not Exist "%~2\" (Echo Folder %2 not found &Exit /B 2)

	FOR /F "tokens=2 delims==." %%d in ('WMIC OS GET LOCALDATETIME /VALUE') DO (
		"C:\Program Files\7-Zip\7z.exe" a "%~2\%~n1_%%d.zip" %1 -mx5
	)
Exit /B
Цитата Iska:
Создаёте задание в Планировщике, которое будет исполнять скрипт с данным кодом в указанное время. »

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


Последний раз редактировалось megaloman, 07-08-2019 в 11:12.

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

Отправлено: 17:16, 06-08-2019 | #3