Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

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

Аватара для gora

Ушёл из жизни


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

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


Код: Выделить весь код
@Echo Off
SETLOCAL enabledelayedexpansion
Set SrcDir1=e:\Temp\SPB\scan
Set Arhive1=e:\Temp\SPB\arhive
Set SrcDir2=e:\Temp\MSK\scan
Set Arhive2=e:\Temp\MSK\arhive
Set FS=%CD%
For /L %%i In (1,1,2) Do (
	RD "!SrcDir%%i!" 2>Nul
	If Exist "!SrcDir%%i!" (
		7z a "!Arhive%%i!\%Date:~6,4%%Date:~3,2%%Date:~0,2%.zip" "!SrcDir%%i!\*">Nul
		cd /d "!SrcDir%%i!"
		RD /S /Q "!SrcDir%%i!" 2>Nul
		cd /d "%FS%"
	) Else MD "!SrcDir%%i!" 2>Nul
)
Pause

Отправлено: 11:44, 05-06-2011 | #12