sa
|
 Posted: Tue Oct 20, 2009 01:44 Post subject: |
 |
|
| aLexx wrote: | | Вот, сочинил уже давно с кнопулей... |
Тоже пытался применить похожий сценарий, только столкнулся с проблемой: он перестаёт корректно работать, если его повесить на Alt-F6 или Alt-F9. На Win-F6, например, всё нормально. Конечно, хотелось бы сохранить привычное назначение клавиш. С приведённым сценарием у меня та же песня.
Есть ли такая проблема и как её обойти, если есть?
Edit.
Обошёл проблему следующим скриптом:
| Code: | '==================================================================
' Распаковать файлы (cm_UnpackFiles)" с включенной опцией "Распаковать
' каждый архив в отдельный каталог (с именем архива)".
'
' В TC внутреннюю cm_UnpackFiles переназначить на Ctrl+Alt+Shift+F6,
' а данный скрипт назначить на привычный Alt+F6.
'==================================================================
Dim WSH
Set WSH = WScript.CreateObject("WScript.Shell")
WSH.SendKeys "^%+{F6}{TAB 4} +{TAB 4}"
' Если не переназначать клавиши, то вместо предыдущей строки
' использовать WSH.SendKeys "%{F6}{TAB 4} +{TAB 4}"
Set WSH = Nothing
Wscript.Quit
|
Вроде работает... |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
