Volniy

|
Posted: Mon Jul 04, 2005 18:34 Post subject: |
|
|
CaptainFlint wrote: | Осталось только впихнуть это в какой-нибудь скрипт и повесить его на горячую клавишу.  |
Помяни только черта - и вот он В смысле не черт, а скрипт, конечно
Code: | '=========================[ Start of file ]=========================
' File: CompareDirs.vbs
' Description: Производит сравнение директорий с учетом подкаталогов
' и отображает в панелях только различия
' Installation: Создайте кнопку на панели TC
' Команда: "диск:\путь\к\файлу\CompareDirs.vbs"
' Copyright: (c) 2005, Volniy
Option Explicit
Dim TCS
Set TCS = CreateObject("TCSCRIPT.Helper")
TCS.Pause=100
TCS.LockTC True
TCS.SendCommand("cm_CompareDirsWithSubdirs")
TCS.SendKeystroke ("{TAB}")
TCS.SendCommand("cm_ShowOnlySelected")
TCS.SendKeystroke ("{TAB}")
TCS.SendCommand("cm_ShowOnlySelected")
TCS.LockTC False
Set TCS=Nothing
Wscript.Quit
'=========================[ End of file ]========================= |
Для работы скрипта понадобится WSH Helper for TС by Volniy [22 КБ] |
|