Любой язык

kmc · Отправлено: **08:45, 13-04-2011** | #11

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

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

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

Iska · Отправлено: **12:46, 13-04-2011** | #12

Цитирую:

Цитата 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 · Отправлено: **09:13, 14-04-2011** | #13

Цитирую:
Цитата 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)
…

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

Iska · Отправлено: **19:08, 14-04-2011** | #14

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

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

kmc · Отправлено: **08:00, 15-04-2011** | #15

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

zero55 · Отправлено: **11:50, 15-04-2011** | #16

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

Iska · Отправлено: **13:40, 15-04-2011** | #17

Цитата kmc:

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

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

kmc · Отправлено: **12:23, 19-04-2011** | #18

Вот исходник,он в принципе такой же как здесь приводят в пример,единственное он не удаляет файлы которые берёт для архивирования.
Где здесь нужно поставить -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%

)

Iska · Отправлено: **17:49, 19-04-2011** | #19

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

kmc · Отправлено: **08:10, 20-04-2011** | #20

На данном форуме,приведён пример программирования 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%

)