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
Jonmey



Joined: 27 Sep 2010
Posts: 45

Post (Separately) Posted: Tue Sep 28, 2010 08:40    Post subject: Помогите создать кнопку со специфической функцией Reply with quote

Помогите создать кнопку со следующей функцией:
в каталоге лежат файлы, среди которых имеются картинки (.gif, .png, jpg), а также один или более файлов .htm (.html) со связанными с ними папками. Остальные файлы и папки в данной папке нас не интересуют; задача состоит в следующем - необходимо сначала копировать (но не переместить) все картинки в папку или в каждую (если их больше одной) из папок связанных с .htm файлом (находящихся в этой же папке, что и картинки), а затем переместить все эти .htm файлы в новую папку (вместе со связанными папками), создаваемую в этом же каталоге. Имя этой папки постоянное и может быть явно указано, например, \readme
____________________

Структура простая таких каталогов простая, например:

123_files (или 123.files)
123.htm (или 123.html)
Таких пар может быть одна, две, три, четыре
987987987.gif (0 или более штук)
979878798.png (0 или более штук)
787987799.jpg (0 или более штук)
Кроме этого в этом каталоге могут иметься какие-то другие файлы и папки, которые не интересуют и не обрабатываются (имена их не пересекаются с вышеперечисленными).

Необходимо все картинки переместить в каждую из папок вида 123_files (или 123.files), а затем создать в этом же каталоге папку с любым произвольным, но одинаковым именем (напр. \readme) и переместить в нее все html пары (файл+папка).

А поскольку каталогов с подобным содержимым тьма, то и возникла потребность в этой кнопке.

Важное примечание - имена путей и файлов могут быть длинными (>8 символов) и содержать пробелы.

Пример подобной папки до обработки (\before ) и после (\after) (все файлы имеют нулевые размеры):

Example.rar
____________________
P.S. На первый взгляд работа чепуховая, но это только часть операции, включающая редактирование НТМ, последовательное использование четырех (минимум, но бывает и больше) программ и т.д. для каждой такой папки. Кое что уже автоматизировано худо-бедно. Но даже в этом виде тяжеловато. После обработки трех сотен таких папок, решил обратиться сюда, поскольку любая дополнительная автоматизация существенно облегчает работу при больших объемах.
Back to top
View user's profile Send private message
Tol!k



Joined: 01 Apr 2008
Posts: 1727
Location: Арзамас

Post (Separately) Posted: Tue Sep 28, 2010 18:13    Post subject: Reply with quote

Не могу скачать архив. Дай нормальную ссылку на filesonic или hotfile или uploadbox


Code:
@echo off &chcp 1251 >nul
setlocal enableextensions

set "all=Readme"
if not exist "%all%" md "%all%"

for /d %%i in (*_files *.files) do (
copy /y *.gif "%%i" &copy /y *.jpg "%%i" &copy /y *.png "%%i"

set "name=%%i"
call move /y "%%name:_files=.htm?%%" "%%all%%"
call move /y "%%name:.files=.htm?%%" "%%all%%"
)
Пробуй.

Last edited by Tol!k on Wed Sep 29, 2010 01:21; edited 1 time in total
Back to top
View user's profile Send private message
Jonmey



Joined: 27 Sep 2010
Posts: 45

Post (Separately) Posted: Wed Sep 29, 2010 00:30    Post subject: Reply with quote

Это мультиобменник, там 16 зеркал. Некоторые из них:
http://www.filesonic.com/file/21989225
http://uploadbox.com/files/ab5d9811a8
http://hotfile.com/dl/72252836/adabde0/Example.rar.html
http://www.megaupload.com/?d=K0YOURM0
Back to top
View user's profile Send private message
Flasher



Joined: 06 Nov 2009
Posts: 14229
Location: Москва

Post (Separately) Posted: Wed Sep 29, 2010 00:56    Post subject: Reply with quote

На том сайте редирект с некоторых браузеров.
Перезалил. Так быстрей будет.
Back to top
View user's profile Send private message
Jonmey



Joined: 27 Sep 2010
Posts: 45

Post (Separately) Posted: Wed Sep 29, 2010 01:09    Post subject: Reply with quote

Tol!k
Вроде все прекрасно работает.
Высший пилотаж!
Хоть его на хлеб и не намажешь, но все равно, огромное спасибо!
Back to top
View user's profile Send private message
Tol!k



Joined: 01 Apr 2008
Posts: 1727
Location: Арзамас

Post (Separately) Posted: Wed Sep 29, 2010 01:34    Post subject: Reply with quote

*Незначительное изменение, устраняющее сообщения "Синтаксическая ошибка..."
Back to top
View user's profile Send private message
Jonmey



Joined: 27 Sep 2010
Posts: 45

Post (Separately) Posted: Wed Sep 29, 2010 01:56    Post subject: Reply with quote

Tol!k
Все работает. Еще раз большое спасибо!
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