kadvlad
|
Posted: Sun Mar 01, 2009 13:49 Post subject: |
|
|
Друзья,
принимайте работу:
за основу взял найденный в TCKB vbs-скрипт
1. Создал "rar.bat":
Code: | @echo off
rar x -p%1 %2%3 %4 |
с параметрами запуска ? %P %N %T и добавил батник в пользовательское меню.
2. Повесил этот пункт меню на хоткей F11.
3. Создал скрипт "paste clipbd.vbs":
Code: | Dim TCS, Str
Set TCS = CreateObject("TCScript.Helper")
Str = TCS.GetTextFromClip
TCS.Pause=100
TCS.LockTC True
TCS.SendKeystroke ("{F11}")
TCS.SendKeystroke ("{HOME}")
TCS.SendKeystroke (Str)
TCS.Pause=100
TCS.SendKeystroke ("{Enter}")
TCS.LockTC False
Set TCS = Nothing
Wscript.Quit
|
4. Повесил скрипт на кнопку
Code: | TOTALCMD#BAR#DATA
"D:\paste clipbd.vbs"
%L
C:\WINDOWS\System32\WScript.exe
paste clipbd
-1 |
Теперь при нажатии на эту кнопку запароленный архив под курсором распаковуется в директорию напротив, а пароль вставляется из буфера обмена.
Посмотрите — я всё правильно сделал?
Спасибо за содействие. |
|