Установка фильтра по расширению

Материал из TCKB 2.0

Перейти к: навигация, поиск
Q: Как на кнопку назначить команду cm_SrcUserSpec с параметрами фильтрации: *.doc;*.txt и т.д.?
A: Подвесь скрипт на кнопку 
Dim TCS
Set TCS = CreateObject("TCSCRIPT.Helper")
TCS.SendCommand "cm_SrcUserDef"
TCS.SendKeystroke "*.doc;*.txt"
TCS.SendKeystroke "{ENTER}"
Set TCS = Nothing
Расширения вписывать понятно где. Для запуска нужен Script Helper.


Batya

Источник — «http://www.tckb.ru/wiki/%D0%A3%D1%81%D1%82%D0%B0%D0%BD%D0%BE%D0%B2%D0%BA%D0%B0_%D1%84%D0%B8%D0%BB%D1%8C%D1%82%D1%80%D0%B0_%D0%BF%D0%BE_%D1%80%D0%B0%D1%81%D1%88%D0%B8%D1%80%D0%B5%D0%BD%D0%B8%D1%8E»
Личные инструменты
Разное
Журнал «Новый Мегабайт»
Реклама
Фотографии подарков и украшений-самоделок. Расценки на услуги.
airopen.ru