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 

Выделение файлов с одинаковыми именами и разным расширением
Goto page 1, 2, 3  Next
 
Post new topic   Reply to topic    Total Commander Forum Index -> Автоматизация Total Commander printer-friendly view
View previous topic :: View next topic  
Author Message
Рамирес_Такт



Joined: 29 Aug 2013
Posts: 7

Post (Separately) Posted: Thu Aug 29, 2013 00:14    Post subject: Выделение файлов с одинаковыми именами и разным расширением Reply with quote

добрый день, господа

дело очень простое - в одной панели файлы с расширением *.jpg, на второй - с расширением *.cr2 (кэноновский raw), и их очень сильно больше, чем джипегов Smile

нужно выделить на второй панели только те *.cr2 файлы, которые имеют аналоги в папке с джипегами (те же имена)

со скриптом справлюсь (памятку прочел Smile ), но отладить его, если что, не смогу, ибо гуманитарий Very Happy

буду крайне благодарен за помощь
Back to top
View user's profile Send private message
LonerD



Joined: 04 Jan 2011
Posts: 1168
Location: Донецк

Post (Separately) Posted: Thu Aug 29, 2013 01:17    Post subject: Reply with quote

Как вариант - скопировать все jpg и cr2 в один каталог (или на виртуальную панель), и использовать TC 8.50Я1, в ней как раз появилась возможность выделения одноимённых файлов.
_________________
Win11 x64 Eng | TC DreamLair eternal pre-α
Back to top
View user's profile Send private message
Tol!k



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

Post (Separately) Posted: Thu Aug 29, 2013 01:31    Post subject: Reply with quote

Quote:
Поиск дубликатов: Возможность поиска по совпадающему полю информационного плагина; напр., часть имени, расширение и т. д.

Back to top
View user's profile Send private message
Flasher



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

Post (Separately) Posted: Thu Aug 29, 2013 05:18    Post subject: Reply with quote

Рамирес_Такт
Если в панелях нет файлов с другими расширениями, то в этом скрипте меняем
Code:
With CreateObject("Scripting.FileSystemObject")
  Set P = .GetFolder(P) : Set T = .GetFolder(T)
End With
на
Code:
Set FSO = CreateObject("Scripting.FileSystemObject")
Set P = FSO.GetFolder(P) : Set T = FSO.GetFolder(T)

и массово F.Name на FSO.GetBaseName(F)
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Back to top
View user's profile Send private message
Рамирес_Такт



Joined: 29 Aug 2013
Posts: 7

Post (Separately) Posted: Thu Aug 29, 2013 23:29    Post subject: Reply with quote

2Flasher:
скрипт не работает, к сожалению
что я делал:
- заменил код на код и массово F.Name на FSO.GetBaseName(F)
- удалил шапку скрипта (теперь он начинается с With WScript.Arguments)
- удалил из папки с джипегами файл thumbs.db (вы писали, что не должно быть файлов с другими расширениями
- параметры ставил такие: "%P" "%T" "1"
- используемая версия коммандера - 6.53 Rolling Eyes
- система - windows xp
запускаю плагин и выскакивает ошибка:
Сценарий : .... .vbs
Строка: 21 (если шапку не удалять - 28 )
Символ: 3
Ошибка: Не удается найти указанный файл
Код: 80070002
Источник: WshShell.Exec

что я делаю не так?

2Tol!k:
в версии 6.53 нет поиска по same plugin fields, если со скриптом не получится, установлю версию поновее и попробую ваш способ
Back to top
View user's profile Send private message
Tol!k



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

Post (Separately) Posted: Thu Aug 29, 2013 23:56    Post subject: Reply with quote

Рамирес_Такт wrote:
в версии 6.53 нет поиска по same plugin fields, если со скриптом не получится, установлю версию поновее
Да уж, надо поновее. Примерно 8.50Я1 Wink
Back to top
View user's profile Send private message
MVV



Joined: 15 Oct 2009
Posts: 4811
Location: Ростов-Дон

Post (Separately) Posted: Fri Aug 30, 2013 00:16    Post subject: Reply with quote

Ага, особенно Я1. Smile Думаю, пока стабильной версии 8.50 не выйдет, лучше сильно не соблазнять людей её фишками.
_________________
TCFS2 + TCFS2Tools: Полноэкранный режим и многое другое (обсуждение)
WINCMD.RU: AskParam, CopyTree, NTLinks, Sudo, VirtualPanel…
Back to top
View user's profile Send private message
Tol!k



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

Post (Separately) Posted: Fri Aug 30, 2013 00:56    Post subject: Reply with quote

Наоборот. Надо рекламировать новые фичи )
Back to top
View user's profile Send private message
Avada



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

Post (Separately) Posted: Fri Aug 30, 2013 07:03    Post subject: Reply with quote

Рамирес_Такт
На основе версии 6.53 здесь практически нет смысла пытаться получить какую-то консультацию (не только по данному вопросу), поскольку все рекомендации будут даваться применительно к современным версиям. В функциональности TC с 2005 года произошли огромные изменения. Для претендующих на полноценную техподдержку на форуме обновление (в оптимальном варианте — до последней стабильной версии) не просто желательно, а обязательно.
_________________
Даже самая богатая фантазия
Не представит себе наши безобразия.
Back to top
View user's profile Send private message
sa



Joined: 29 Apr 2009
Posts: 2563

Post (Separately) Posted: Fri Aug 30, 2013 08:30    Post subject: Reply with quote

Рамирес_Такт
Если можно обойтись без автоматизации…
1. Выделить файлы *.jpg и сохранить выделение в файл.
2. В редакторе заменить .jpg на .cr2, выделить всё и скопировать в буфер.
3. Загрузить выделение из буфера.
Back to top
View user's profile Send private message
Flasher



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

Post (Separately) Posted: Fri Aug 30, 2013 09:46    Post subject: Reply with quote

Рамирес_Такт
 Я кое-что там не учёл (шапку читать, а не удалять):

_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.


Last edited by Flasher on Fri Aug 30, 2013 18:38; edited 2 times in total
Back to top
View user's profile Send private message
Рамирес_Такт



Joined: 29 Aug 2013
Posts: 7

Post (Separately) Posted: Fri Aug 30, 2013 09:52    Post subject: Reply with quote

спасибо, камрады, за ответы
буду пробовать, об итогах отпишу
Back to top
View user's profile Send private message
Рамирес_Такт



Joined: 29 Aug 2013
Posts: 7

Post (Separately) Posted: Thu Sep 12, 2013 22:10    Post subject: Reply with quote

sa, спасибо за отличный способ. просто и эффективно Very Happy

Flasher, к сожалению, ваш скрипт запустить не удалось. строка 36, символ 3, не удается найти указанный файл. код 80070002, источник wshshell.exec

возможно, я накосячил с установкой TCFS2 + TCFS2Tools ?
(ну, установка - это громко сказано Embarassed я не смог найти инструкции и просто скопировал ini и dll файлі в системные папки)
Back to top
View user's profile Send private message
Flasher



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

Post (Separately) Posted: Thu Sep 12, 2013 22:55    Post subject: Reply with quote

Рамирес_Такт wrote:
возможно, я накосячил с установкой TCFS2 + TCFS2Tools ?
Совершенно верно. Путь к TCFS2 в скрипте не соответствует реальному. Утилита портабельная, никаких специальных настоек для неё не требуется. Достаточно скопировать в любую подпапку Коммандера и прописать путь с переменной среды в скрипте.
TCFS2Tools в данном случае можно не ставить. Это от старого скрипта мысль осталась.
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.
Back to top
View user's profile Send private message
Tol!k



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

Post (Separately) Posted: Thu Sep 12, 2013 23:42    Post subject: Reply with quote

sa wrote:
Если можно обойтись без автоматизации…
1. Выделить файлы *.jpg и сохранить выделение в файл.
2. В редакторе заменить .jpg на .cr2

кнопка
Code:
TOTALCMD#BAR#DATA
%ComSpec% /c chcp 1251 &(for /f "delims=" %# in
('dir /b *.jpg') do @echo(%%~n#.cr2)>.cr2.lst
wcmicons.dll,26
список с заменёнными на .cr2 расширениями

1
-1


осталось
3. Загрузить выделение из файла.
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
Goto page 1, 2, 3  Next
Page 1 of 3

 
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