Объект встроенного языка СоединенияИнформационнойБазы позволяет получить информацию об активных соединениях информационной базы. Эту информацию, например, можно вывести в табличное поле, расположенное в форме:
Пример:
Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
// Создание колонок в таблице значений
// ЭлементыФормы.АктивныеПользователи - табличное поле
// АктивныеПользователи - связанная с ним таблица значений
АктивныеПользователи.Колонки.Добавить("Пользователь", , , 40);
АктивныеПользователи.Колонки.Добавить("Приложение", , , 20);
АктивныеПользователи.Колонки.Добавить("Начало", , , 20);
АктивныеПользователи.Колонки.Добавить("Компьютер", , , 20);
АктивныеПользователи.Колонки.Добавить("Соединение", , , 10);
//Заполнение активными пользователями
Соединения = ПолучитьСоединенияИнформационнойБазы();
Для каждого СоединениеИнформационнойБазы Из Соединения Цикл
СтрокаАктивныйПользователь = АктивныеПользователи.Добавить();
СтрокаАктивныйПользователь.Пользователь = СоединениеИнформационнойБазы.Пользователь;
СтрокаАктивныйПользователь.Приложение = ПредставлениеПриложения(СоединениеИнформационнойБазы.ИмяПриложения);
СтрокаАктивныйПользователь.Начало = СоединениеИнформационнойБазы.НачалоСеанса;
СтрокаАктивныйПользователь.Компьютер = СоединениеИнформационнойБазы.ИмяКомпьютера;
СтрокаАктивныйПользователь.Соединение = СоединениеИнформационнойБазы.НомерСоединения;
КонецЦикла;
ЭлементыФормы.АктивныеПользователи.СоздатьКолонки();
КонецПроцедуры
| 
