Страница 1 из 1

Групповое переименование одной кнопкой

Добавлено: Вт дек 11, 2012 15:10
Sergiusnet
Имеется несколько шаблонов для группового переименования, нужно вынести кнопки для каждого шаблона на панель инструментов и переименовывать все файлы в активной панели по соответствующему шаблону, без вызова дополнительного диалогового окна multirename. то есть только одной кнопкой, нажал и переименовалось.

Добавлено: Вт дек 11, 2012 15:44
Avada
Sergiusnet
Использование команды multirename имя_шаблона с последующим нажатием Enter (нажатие кнопки "Выполнить"), а затем Escape (закрытие окна инструмента). И окно всё равно фактически отображаться будет, только ненадолго. Вообще без вызова окна задача не решается.

Добавлено: Вт дек 11, 2012 15:51
Sergiusnet
про комманду multirename имя_шаблона знаю, но нужно именно чтобы без дополнительных нажатий, на то она и автоматизация, может быть возможно скриптом это организовать?

Добавлено: Вт дек 11, 2012 16:06
Avada
Sergiusnet
Скриптом — возможно. Прочитают специалисты — напишут. И в правила форума советую заглянуть. Ненужное цитирование удалено.

Добавлено: Вт дек 11, 2012 16:13
sa
Sergiusnet

Код: Выделить всё

'==================================================================
' Описание:    Выделить все файлы, вызвать пользовательскую команду 
'             и послать нажатия клавиш Enter и ESC
' Параметр:   Имя пользовательской команды
' Требования: Необходима регистрация WSH Helper for TC by Volniy
'==================================================================
Option Explicit
Dim TCS
Set TCS = CreateObject("TCScript.Helper")
TCS.SendCommand "cm_SelectAllFiles"
TCS.UserCmd WScript.Arguments(0)
TCS.SendKeystroke "{Enter}"
TCS.SendKeystroke "{ESC}"
Set TCS = Nothing
Wscript.Quit
Вообще-то, нажатия из скрипта небезопасны.

Добавлено: Вт дек 11, 2012 16:38
Sergiusnet
не работает:(

Добавлено: Вт дек 11, 2012 17:33
sa
Кнопка:

Код: Выделить всё

TOTALCMD#BAR#DATA
%COMMANDER_PATH%\VBS\MRT.vbs
em_MRT_XXX
wcmicons.dll,46
Выделить все файлы, вызвать команду em_MRT_XXX, нажать Enter и ESC


-1

Добавлено: Вт дек 11, 2012 18:36
Вахмурка
Здесь дискуссия на ту же тему.

Добавлено: Ср дек 12, 2012 11:22
Avada
Вахмурка писал(а):Здесь дискуссия на ту же тему.
Совершенно верно. Поэтому текущую тему закрываю.