8.
Atheist
14.11.08 21:13
Сейчас в теме
Я при выбросе пользователей обхожусь без дополнительных компонент. Создаю константу "МинутДоЗавершения" В глобальнике при начале работы системы при помощи ОбработкаОжидания() вызываю процедуру, которая считывает константу и если значение константы больше нуля, то начинается отсчет времени и выдается сообщение с предупреждением о скором закрытии 1С. Потом по достижению счетчиком нуля вызывается ЗавершитьРаботуСистемы(0); и пользователи благополучно вылетают. А те, кто пытается войти, получают ругательное сообщение, которое повисев несколько секунд исчезает вместе с 1С.
Единственная возможная проблема - это модальное окно, например, в интерфейсе есть строка меню с вызовом справочника, на который у пользователя нет прав. Вообще не приходилось с такой ситуацией сталкиваться, да и лень что-то смоделировать такое, но думаю это решаемая проблема:
Попытка
ЗавершитьРаботуСистемы(0);
Исключение
WSH=СоздатьОбъект("WScript.Shell");
WSH.SendKeys("^{ENTER}");
ЗавершитьРаботуСистемы(0);
КонецПопытки