0
Verita
16.03.13
✎
21:59
|
Добрый день всем!
Есть задача - вывести в табличку список активных пользователей. Есть следующие методы:
&НаКлиенте
Процедура ОбновитьФорму(Команда)
Попытка
Объект.АктивныеПользователи.Очистить();
МассивСоединений=ПолучениеСпискаАктивныхПользователей();
Для Каждого Соединение Из МассивСоединений Цикл
НовСтр=Объект.АктивныеПользователи.Добавить();
НовСтр.Пользователь = Соединение;
КонецЦикла;
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
КонецПроцедуры
Функция ПолучениеСпискаАктивныхПользователей()
ИтогСписокСоединений = новый Массив;
ИтогСписокСоединений.Очистить();
СоединенияИнформационнойБазы = ПолучитьСоединенияИнформационнойБазы();
Для Каждого Соединение Из СоединенияИнформационнойБазы Цикл
ИмяПользователя=Соединение.Пользователь.Имя;
Пользователь = Справочники.Пользователи.НайтиПоНаименованию(ИмяПользователя());
ИтогСписокСоединений.Добавить(Пользователь);
КонецЦикла;
Возврат (ИтогСписокСоединений);
КонецФункции
В итоге, после отработки получаем - N пользователей, все, кто запущен не на этом компе не определились - при трассировке Соединение.Пользователь.Имя = ""
Хочу, чтобы определялось =)
Платформа 8.2.16.368
|
|