Книга знаний

1С:Предприятие / Приемы программирования / Внешние обработки

Автоматическое закрывание запросов при поиске в конфигураторе

Поиск по папке с внешними отчетами и обработками иногда натыкается на ошибки и запароленные файлы, и тогда возникает окно с ошибкой или запросом пароля. Если поиск длительный, то бывает утомительно ждать появления этих окон - поэтому я решил автоматизировать этот процесс.Автор статьи: romix | Редакторы:
Последняя редакция №3 от 12.12.07 | История
URL: http://kb.mista.ru/article.php?id=616

Этот текст надо поместить в файл с расширением .vbs, и запустить его на выполнение. Прекратить его работу можно из диспетчера задач.


Set WshShell = CreateObject("WScript.Shell")
While 1=1 'бесконечный цикл
 WScript.Sleep 1000' пауза в миллисекундах
 Res = WshShell.AppActivate("Доступ ограничен") 'Для окошек с паролем
 If Res Then WshShell.SendKeys "{ENTER}" 'Здесь надо указать пароль перед словом {ENTER}
 Res = WshShell.AppActivate("Конфигуратор") 'Для окошек типа общая файловая ошибка
 If Res Then WshShell.SendKeys "{ENTER}"
Wend


Пример полезного применения AppActivate и SendKeys.

Описание | Рубрикатор | Поиск | ТелепатБот | Захваченные статьи | Установки | Форум
© Станислав Митичкин (Волшебник), 2005-2025 | Mista.ru

Яндекс.Метрика