Попытка 
      УстановитьМонопольныйРежим(Истина); 
Исключение 
        Предупреждение("К базе подключены пользователи. Монопольный режим установить невозможно!", 7); 
КонецПопытки; 
Если МонопольныйРежим() Тогда 
     Сообщить("Монопольный режим установлен"); 
КонецЕсли; 
УстановитьМонопольныйРежим(Ложь);