Тема: AutoHotkey: быстрый вход в сетевое окружение в Total Commander
; запрещаем имена переменных как у переменных окружения
; (повышаем производительность скрипта)
#NoEnv
#NoTrayIcon ; без иконки в трее
IfWinExist, ahk_class TTOTAL_CMD ; если запущен Total Commander
{
; узнаем, какая панель сейчас активна
ControlGetFocus, Active_Panel, ahk_class TTOTAL_CMD
If Active_Panel = TMyListBox1 ; если правая, то...
; получить текущий путь из заголовка панели
ControlGetText, Panel_Text, TMyPanel9
If Active_Panel = TMyListBox2 ; если левая, то...
; получить текущий путь из заголовка панели
ControlGetText, Panel_Text, TMyPanel5
IfInString, Panel_Text, \\\ ; если сейчас в панели открыт плагин, то...
{
; открыть новую вкладку
SendMessage, 1075, 3001,,, ahk_class TTOTAL_CMD
; открыть в ней "Мой компьютер" (избавляемся от, возможно, открытого плагина)
SendMessage, 1075, 2122,,, ahk_class TTOTAL_CMD
}
; вбить в командную строку адрес локального компьютера
ControlSetText, Edit1, cd \\%A_ComputerName%, ahk_class TTOTAL_CMD
; перейти по указанному адресу
ControlSend, Edit1, {Enter}, ahk_class TTOTAL_CMD
; выйти на два уровня выше, т.е. в список доменов и рабочих групп
ControlSend, %Active_Panel%, {BS 2}, ahk_class TTOTAL_CMD
}
Данный скрипт удобно повесить на кнопку в панели инструментов Total Commander. Скрипт удобен тем, что открывается папка не "Сетевое окружение", а сразу "Microsoft Windows Network". Если в активной панели открыт какой-нибудь плагин, то адрес будет открываться в новой вкладке. В последней строке скрипта вместо {BS 2} можно написать {BS}, если вам так удобнее.
Идею предложил Androgen.
В названии ветки всегда должен быть указан язык программирования или среда исполнения скрипта, если это возможно.