[megaloman]

romfus, То же, что у alpap, но с датой в имени архива. В коде сейчас (жесткое порно) для архиватора 7-Zip формат архива указан как zip, при этом расширение архивного файла будет arj, так как, повторю: Ни rar ни 7z не делают архивы в формате arj. В .zip - можно. ИМХО, он наиболее совместим с остальными архиваторами

Код:

@Echo Off
cls
	Set "ArcType=zip"
	Set "ArcExt=arj"

	Set "Arc="%ProgramFiles%\7-Zip\7zG.exe" a -t%ArcType% -sdel"

	FOR /F "tokens=2 delims==." %%d in ('WMIC OS GET LOCALDATETIME /VALUE') DO SET "@Tdate=%%d"
	Set "MMDD=%@Tdate:~4,2%%@Tdate:~6,2%"

	Call :DoArc "D:\1_Ingener\Волжский\f_оut\Выгрузка\Массив"           "*.XML *.p7s" "D:\1_Ingener\Волжский\f_оut\Выгрузка\Массив\МассивВолжский%MMDD%.%ArcExt%"
	Call :DoArc "D:\1_Ingener\Волжский\f_оut\Выгрузка\ОтчётыПоМассивам" "*.bmp *.p7s" "D:\1_Ingener\Волжский\f_оut\Выгрузка\ОтчётыПоМассивам\ОтчетыВолжский%MMDD%.%ArcExt%"
pause
Exit /B 0

:DoArc
	Pushd %1 ||(Echo %1 &Exit /B 1)
	%Arc% %3 %~2
	Popd
Exit /B 0