Архивирование файлов в каталоге
 

Здравствуйте.

Есть необходимость архивировать все файлы (кроме уже существующих архивов) в исходном каталоге. Имя архива должно полностью повторять имя файла за исключением расширения. Скрипт должен работать только в определённый промежуток времени (ночью). При создании архива исходный файл должен удаляться. Также нужно вести логи всего происходящего. Не желательно обращаться к WinRar т.к. это программа платная, а на работе с этим строго.


Есть опыт написание BAT-ников, и VBS-скриптов, но только исходя из готовых примеров.

Хотелось бы чтобы вы дали какие нибудь полезные ссылочки или учебники где всё подробно объясняется. Буду очень признателен

Архиватор можно заменить на автономный 7zr.exe или 7za.exe, положив его в любое место и прописав к нему путь.
Лог будет дописываться при каждом запуске.
Если в исходной папке будут несколько файлов с одинаковым именем, но разным расширением, то они будут упакованы в один архив. Этого можно избежать, если присваивать имя архиву равное имени и расширению исходного файла. В постановке задачи это не оговорено.
Архив можно создавать не 7z, а zip, для этого нужно просто заменить в скрипте расширение.
Запускать скрипт через планировщик.
Исходная папка и папка назначения могут быть и одной папкой

Tonny_Bennet, в качестве примера используется консольный архиватор 7za:
Настройте запуск батника через планировщик задач.

Цитата:

Цитата Tonny_Bennet Не желательно обращаться к WinRar т.к. это программа платная, а на работе с этим строго. »

Угу, везде так. К WinRAR'у придираются, а стоят пиратские винды и оффисы.


Опоздал...:)

El Sanchez, архивы 7z он не заархивирует повторно, а удалить их ему ни кто не помешает. ;)

Зпуск в планировщике это конечно хорошо но т.е. запуститься он запуститься а вот кто его остановит неизвестно...

gora, скрипт работает. Спасибо.... но он только и файл логов архивирует и сам файл скрипта если он лежит в папке :)

А зачем он там лежит?! :dont-know В задаче это не оговорено.
1 Вынесите скрипт из папки (лог создается рядом со скриптом)
2 Добавьте расширения скрипта и лога (у лога оно может быть произвольным) в строку Он сам остановится после выполнения работы. Или у Вас там столько файлов, что он за одну ночь их все не упакует и нужно переносить работу на следующую ночь? ;)

Тогда укажите временнЫе границы работы скрипта.

Для начала я бы провёл организационные мероприятия. Все архивы поместил бы в отдельную папку. Очень неплохо, чтобы там батник делал подпапки с именем, содержащим год и месяц (и, может быть, день), в которые бы архивы создавались - зачем нужны архивы за неопределённый период. Туда бы записывал лог. В принципе, и батник можно поместить туда же. И, прежде чем удалять исходный файл, я бы убедился, что архив существует (а вдруг место на диске исчерпалось, а файлы будем удалять ...). И, кроме того, я бы застраховался от того, что два файла имеют одинаковые имена, но разные расширения, так как такие файлы обычно архиватором архивируются с одинаковыми именами-расширениями и, в лучшем случае, получим архив с несколькими файлами с одинаковыми именами и разными расширениями. А просили заархивировать каждый файл отдельно.Source - где исходные файлы
Arch - где архивы
ExtArc - расширение, с которым создаётся архив
LogFile - куда пишется лог-файл
PgmArc - где архиватор (я делал для 7Z)

Например, файл D:\Source\траляля.exe
будет заархивирован в файл D:\Source\Arch\20100909\траляля.exe.7Z
и если файл D:\Source\Arch\20100909\траляля.exe.7Z существует, то удалим D:\Source\траляля.exe

Батник помещаем в назначенные задания, где укажем время его выполнения.
Можно при желании сделать в лог файле выдачу размера каждого файла до и после архивации.

megaloman, Вот ОНО!!! Благодарю :)

Как можно упаковать каталог с файлами через lzma? Не просто каталог а именно каждую файл отдельно в свою каталог упаковать и удалить упакованный файл. Например, C:\temp\*.* там есть:

примерно так:
А WCX SSSR LZMA плагин через Total CMD так упакует:
и не может удалить оригинал файлы.

Добрый день!!!
В данных рассуждениях идёт речь об архивации файлов в определённой папке.Всё работает,спасибо.

Но вот вопрос,как переделать код для задачи архивации файлов и папок с вложенными файлов,хранящихся в одной папке.
То есть у меня есть папка допустим D:/Source,а в свою очередь в этой папке есть и файлы и папки в которых хранятся файлы.
И также стоит задача архивировать все данные в один файл.

За ранее благодарен

Цитирую:

Цитирую:
Цитата 7-Zip Command Line Version User's Guide:
a (Add) command
Adds files to archive.
…
Switches that can be used with this command
…
-r (Recurse)
…

Это к моему вопросу?

kmc, да. Вы пробовали?

Для цитирования используйте тэг «quote».

Нет не пробовал.Честно говоря не пойму куда этот код вставлять-имеется ввиду после как строчек

предложу метод на powershell вот он

Примеры есть непосредственно в справке 7-Zip:

Вот исходник,он в принципе такой же как здесь приводят в пример,единственное он не удаляет файлы которые берёт для архивирования.
Где здесь нужно поставить -r(.......) ????

Set Source=D:\Ser\Source
Set Arch=D:\Ser\Arch
Set ExtArc=7Z
Set LogFile=D:\Ser\Log\{Archives.log

Set PgmArc="C:\Program Files\7-Zip\7z.exe"

Set DirDay=%Arch%\%Date:~6,4%%Date:~3,2%%Date:~0,2%
md "%DirDay%"

FOR %%i IN ("%Source%\*.*") DO Call :Arhivator "%%i"
GoTo :Eof

:Arhivator

Set N=%DirDay%\%~nx1.%ExtArc%

%PgmArc% a "%N%" %1

If Exist "%N%" (
Echo %Date% %Time% %N% >>%LogFile%

)

kmc, тогда сначала словами опишите, что Вам нужно.

На данном форуме,приведён пример программирования bat файла,где реализуется след. задача:
Происходит архивирование файлов,находящихся по указонному пути Set Source=D:\Ser\Source ,причём архивация идёт каждого файла в одну папку-на заархивированнной папке указывается дата архивации.Но у меня задача немного другая,мне требуется заархивировать также не только файлы находящиеся по указанному пути но папки и вложения в них(любые,как и папки и файлы).
Вот код который реализуется архивацию файлов,без папок и вложения.Смысл в том чтобы происходила архивация всего что находится в Source(папки,вложения в папки и т.д. -всё!!!) в один файл.

Set Source=D:\Ser\Source
Set Arch=D:\Ser\Arch
Set ExtArc=7Z
Set LogFile=D:\Ser\Log\{Archives.log

Set PgmArc="C:\Program Files\7-Zip\7z.exe"

Set DirDay=%Arch%\%Date:~6,4%%Date:~3,2%%Date:~0,2%
md "%DirDay%"

FOR %%i IN ("%Source%\*.*") DO Call :Arhivator "%%i"
GoTo :Eof

:Arhivator

Set N=%DirDay%\%~nx1.%ExtArc%

%PgmArc% a "%N%" %1

If Exist "%N%" (
Echo %Date% %Time% %N% >>%LogFile%

)

kmc, уточним: Вам нужно архивировать всё содержимое одной папки (например, «D:\Ser\Source»), включая все вложенные папки и файлы, в один архив, который нужно помещать в некую папку (например, «D:\Ser\Arch») в создаваемую подпапку с именем, основанным на текущей дате (например, «…%Date:~6,4%%Date:~3,2%%Date:~0,2%»)?

P.S. Код на форуме оформляется тэгом «code».

Iska, Совершенно верно.

Подскажите пожалуйста у меня похожая задача, но есть небольшая разница, требуется: архивировать директорию с вложеными папками и кучей файлов, чтобы каждый файл получался как отдельный архив с сохранением структуры папок.

я взял скрипт от gora, слегка изменил:

@Echo Off
ChCp 1251>Nul
SetLocal EnableDelayedExpansion
Set src=F:\users_backup\dv\src
Set arch=F:\users_backup\dv\temp
Set ar7z=C:\Program Files\7-Zip\7z.exe

(For /R "%src%" %%a In (*.*) Do (
"%ar7z%" a "%arch%%%~pa%%~na.7z" `%%a`>Nul
Echo !Date! !Time! Файл "%%a" заархивирован в "%arch%%%~pa%%~na.7z"
Del /F/Q "%%a">Nul
Echo !Date! !Time! Исходный файл %%a удален
)
)>>log.txt


Всё работает, но есть косяк, с обработкой файлов содержащих в названии спецсимволы, как можно это обойти и обрабатывать их нормально?

P.S. для кода используйте теги CODE

amel27, большое спасибо всё работает

Iska,хочу также уточнить,чтобы структура папок оставалось той же

kmc, выбирайте вариант:

gora,Спасибо.
Я адаптирую под данный код Ваш пример ,получается "%PgmArc%" a "%Arch%\with_folder_%Date:~6,4%%Date:~3,2%%Date:~0,2%.7z" "%Source%" >Nul и что-то никак не пойму куда закодить, туда куда вроде бы надо он не архивыриует,создаёт только папку,понятное дело что не там прописываю.

Set Source=D:\Ser\Source
Set Arch=D:\Ser\Arch
Set ExtArc=7Z
Set LogFile=D:\Ser\Log\{Archives.log

Set PgmArc="C:\Program Files\7-Zip\7z.exe"

Set DirDay=%Arch%\%Date:~6,4%%Date:~3,2%%Date:~0,2%
md "%DirDay%"

FOR %%i IN ("%Source%\*.*") DO Call :Arhivator "%%i"
GoTo :Eof

:Arhivator

Set N=%DirDay%\%~nx1.%ExtArc%

%PgmArc% a "%N%" %1

If Exist "%N%" (
Echo %Date% %Time% %N% >>%LogFile%

)

gora,Спасибо.
Я адаптирую под данный код Ваш пример ,получается "%PgmArc%" a "%Arch%\with_folder_%Date:~6,4%%Date:~3,2%%Date:~0,2%.7z" "%Source%" >Nul и что-то никак не пойму куда закодить, туда куда вроде бы надо он не архивыриует,создаёт только папку,понятное дело что не там прописываю.

Set Source=D:\Ser\Source
Set Arch=D:\Ser\Arch
Set ExtArc=7Z
Set LogFile=D:\Ser\Log\{Archives.log

Set PgmArc="C:\Program Files\7-Zip\7z.exe"

Set DirDay=%Arch%\%Date:~6,4%%Date:~3,2%%Date:~0,2%
md "%DirDay%"

FOR %%i IN ("%Source%\*.*") DO Call :Arhivator "%%i"
GoTo :Eof

:Arhivator

Set N=%DirDay%\%~nx1.%ExtArc%

%PgmArc% a "%N%" %1

If Exist "%N%" (
Echo %Date% %Time% %N% >>%LogFile%

)

Необходимо создать 7z sfx ( или rar sfx ) содержимого папки с подпапками с запуском батника из самой папки. Сам батник должен быть в архиве. Исходную папку очистить. Архив создать в корне диска С.
Такое возможно?

п.с. Чтобы сам батник не был занят системой и попал в архив, может быть всё скопировать в временную папку для дальнейшей архивации?

Имя екзешника=имени батника. Екзешник с архивом в самой папке В корне C: Для 7-Zip несколько сложнее и ненадёжнее, я не знаю у 7-zip ключа, который отвечает за удаление файлов после архивации

Как сделать, чтобы сама папка, в которой батник не архивировались, а архивировались в sfx только её содержимое с подпапками? Как добавить комментарий и значёк иконки?

Вопрос добавления комментария к rar sfx решен. Информация взята отсюда

Осталась не решеной задача добавления значка ico в sfx

отправил запрос в службу поддержки RAR

Для WinRAR есть специальный ключ для смены иконки:

megaloman, gora, спасибо за помощь. Вопрос добавления значка ярлыка тоже решен.

Подскажите, как отследить окончание работы RAR и вывести Echo?
С пингом не всегда угадывается.

amel27, не получается. С wait после архивирования, командная строка сразу закрывается.

Так и должно быть.
Вы используете ключ M который удаляет после архивации все файлы из текущей папки в том числе и сам батник. Поэтому батник и не может выполнить ни чего после строки архивирования ибо его (батника) после архивации больше нет.

Смысл всей возни - батник генерирует новый батник в папке для врменных файлов, оттуда его затем запускает. При этом Start упаковщику не нужен вовсе, пока упаковщик не отработает, батник далее исполняться не будет. Недостающие на ваш взгляд ключи для упаковщика припишите самии (коментарии-иконки). Мелкая неприятность - в папке %Tmp% остаётся батник. Но я, например, перед завершением работы эту папку чищу, а, во вторых, несколько байт погоды не делают.
Если батник запускается из разных папок, чтобы эти служебные батники не размножались, вместо имени "%Tmp%\~%Name%.bat" придумать какое-то постоянное, например,
"%Tmp%\~kuku.bat"

можно взять всё это в скобки:

megaloman, спасибо, принцип понятен, но пока сложен для понимания.
amel27, респект! Всё работает, как надо!

Подскажите, как отредактировать скрипт чтобы создать архив папки с подпапками, запуская командный файл в одной из подпапок.

Заменить "%~dp0", которое указывает на путь к батнику, на конкретное полное имя папки, которую архивируем, например, "E:\My backup\"

Уважаемые знатоки! Нужна помощь по упаковке в 7z sfx архив папки с подпапками и файлами. Есть замечательный скрипт gora http://forum.oszone.net/post-1436397-46.html ,однако он "заточен" под конкретную программу, а не под набор папок и файлов. Самостоятельно подправить его под свои нужды не получается.

Приведите свой список файлов и папок, которые нужно упаковать. Папки нужно упаковывать со всем содержимым? Расположение папок и файлов относительно скрипта (желателен один уровень) ?

Office 2010 SP1да
да, скрипт должен находится в одном уровне с папками и файлами.

п.с. Если ещё и удастся заменить заменить иконку sfx на свою ( "Updates\1.ico" - reshacker присутствует в системе ), установить вручную дату сборки, добавить описания для понятия принципа работы скрипта, было бы вообще супер. :blush2:

Вопрос создания архива решен. Спасибо gora!

Здравствуйте, ребята. Помогите решить такую задачу. Имеется папка, в ней *.exe файлы и *.txt файлы с описанием. Структура такова
Прошу помощи в насании скрипта или батника который упаковал бы файлы с похожими имена в отдельный архив. То есть чтобы
заархивировался в explorer.exe.zip
в notepad.exe.zip и так далее.

Ruslan-kam, примерно так:
Вызываете, указав в качестве параметра путь к папке: «Имеется папка, в ней *.exe файлы и *.txt файлы с описанием». Дабы сам пакетный файл не попал в архивы — не кладите его в эту папку, а вызывайте из любого другого места указанием пути к нему. Архивы будут созданы в текущей папке.

Iska, ура! Сработало!
Спасибо, добрый человек.

Помогите нубу справится.
Архивирую фалы в каталоге найденным здесь же скриптом.
Теперь нужно выполнить обратную задачу:

В результате каждый архив распаковывается в свою папку, хотя структура каталогов сохраняется. Как сделать, чтобы каждый архив распаковывался как файл, сохранив при этом структуру каталогов?

Ваш вопрос непонятен.