Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Автоматическое архивирование

 
Post new topic   Reply to topic    Total Commander Forum Index -> Автоматизация Total Commander printer-friendly view
View previous topic :: View next topic  
Author Message
ant333



Joined: 01 Oct 2010
Posts: 3

Post (Separately) Posted: Fri Oct 01, 2010 21:25    Post subject: Автоматическое архивирование Reply with quote

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

Есть нужда зархивировать кучу файлов.

с:\Папка№1(одна постоянная)
-->с:\папка№1\подпапка1...n(разное количество)
-->с:\папка№1\подпапка1...n\(подпапки и файлы)№3.

Надо взять папку№1, зайти по очереди в каждую подпапку1...n и зархивировать все имеющиеся в ней (папки и файлы) №3 в отдельный архив с названием подпапки1...n.
Т.е на выходе должно быть 1...n архивов с (папками и файлами)№3
Архивы нужно сохранять в с:\Архивы например.

Заранее, огромное спасибо за помощь!

З.Ы. может кто знает, где можно скачать Aezay TC Script Editor, а то сайт автора лежит.
Или может есть подобная программа, где просто можно вставлять нужные команды ТС в макрос. Все что я видел требует знания VB которого я не знаю.
_________________
ant333
Back to top
View user's profile Send private message
Samwatas



Joined: 12 Sep 2009
Posts: 95

Post (Separately) Posted: Fri Oct 01, 2010 23:02    Post subject: Reply with quote

Не указано, каким архиватором и с какими опциями нужно жать, но можно, например так:
Code:

TOTALCMD#BAR#DATA
%comspec% /c
for /D %%a in ("%P%S\*") do "C:\Program Files\WinRAR\WinRAR.exe" a -r -ep1 c:\Архивы\%%~na %%~a
%commander_path%\TOTALCMD.EXE,2



-1


Если Винрар установлен в другую папку, то поправь путь (ну и опции можно по вкусу добавить). Папочку с:\Архивы нужно сперва создать самому (вручную). Потом в тотале становишься на папку с:\папка№1 и нажимаешь кнопку.


Last edited by Samwatas on Sat Oct 02, 2010 00:50; edited 1 time in total
Back to top
View user's profile Send private message
ant333



Joined: 01 Oct 2010
Posts: 3

Post (Separately) Posted: Fri Oct 01, 2010 23:24    Post subject: Reply with quote

Спасибо! Но проблема в том, что нужно, например, открыть с:\папка№1\подпапка1 в ней есть файлы и папки их нужно как бы выделить и заархивировать в отдельный архив без самой подпапки1. Т.е в архиве должныбыть сразу файлы и папки. А архив назвать именем подпапка1. И так для каждой с:\папка№1\подпапка1, с:\папка№1\подпапка2 ....... с:\папка№1\подпапкаN
_________________
ant333
Back to top
View user's profile Send private message
Samwatas



Joined: 12 Sep 2009
Posts: 95

Post (Separately) Posted: Sat Oct 02, 2010 00:11    Post subject: Reply with quote

Я как бы мягко намекнул, что поковырявшись в справке винрара, можно найти все необходимые опции, но меня никто не услышал. А напрасно, винрар тоже может паковать в зип с максимальным сжатием (он почти не уступает тоталовскому встроенному зипу - разница там копеечная).
Кнопка в таком случае превращается в:
Code:
TOTALCMD#BAR#DATA
%comspec% /c
for /D %%a in ("%P%S\*") do "C:\Program Files\WinRAR\WinRAR.exe" a -r -ep1 -m5 c:\Архивы\%%~na.zip %%~a\*
%commander_path%\TOTALCMD.EXE,2



-1


Пакуется всё без подпапки (как и было запрошено - сразу файлы и папки).


Last edited by Samwatas on Sat Oct 02, 2010 00:50; edited 1 time in total
Back to top
View user's profile Send private message
ant333



Joined: 01 Oct 2010
Posts: 3

Post (Separately) Posted: Sat Oct 02, 2010 00:28    Post subject: Reply with quote

ОК. Спасибо. Теперь то, что надо. Может кинеш ссылочку, где разжеванно все подробно, как составлять подобное??
_________________
ant333
Back to top
View user's profile Send private message
Avada



Joined: 01 Aug 2008
Posts: 10415
Location: Россия, Саратов

Post (Separately) Posted: Sat Oct 02, 2010 00:48    Post subject: Reply with quote

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

Ненужные цитаты убраны.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Total Commander Forum Index -> Автоматизация Total Commander All times are GMT + 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group