0 / 0 / 0
Регистрация: 10.05.2009
Сообщений: 38
|
|
1 | |
Текущий пользователь и Сервер06.12.2010, 17:11. Показов 16021. Ответов 6
Метки нет Все метки)
(
Как передать текущего пользователя(пользователей) на сервер. У меня регламентная задача возвращает некий список пользователей.
Очень хочется проверять активного пользователя ИБ на принадлежность к этому списку. Но задание выполняется на сервере - пользователя нет. И из метода Рег. задачи не могу достучаться до локальных процедур. Подскажите пожалуйста кто знает!
0
|
|
06.12.2010, 17:11 | |
Ответы с готовыми решениями:
6
Выяснить, работает ли в текущий момент пользователь с заданным именем Ошибка. Текущий вошедший пользователь не обладает правами администратора
Как подключиться к домену Active Directory и проверить, в каких группах текущий пользователь |
0 / 0 / 0
Регистрация: 24.12.2008
Сообщений: 1,399
|
|
06.12.2010, 17:13 | 2 |
Т.е. нужно, чтобы регламентное задание знало список активных пользователей?
0
|
0 / 0 / 0
Регистрация: 10.05.2009
Сообщений: 38
|
|
06.12.2010, 17:16 | 3 |
именно так
0
|
0 / 0 / 0
Регистрация: 24.12.2008
Сообщений: 1,399
|
|
06.12.2010, 17:32 | 4 |
Может это подойдет?
Код ( (Unknown Language)): &НаСервере Процедура ЗаполнитьСписокПользователей() СписокПользователей.Очистить(); СеансыИнформационнойБазы = ПолучитьСеансыИнформационнойБазы(); Для Каждого СеансИБ Из СеансыИнформационнойБазы Цикл СтрПользователя = СписокПользователей.Добавить(); СтрПользователя.Приложение = ПредставлениеПриложения(СеансИБ.ИмяПриложения); СтрПользователя.НачалоРаботы = СеансИБ.НачалоСеанса; СтрПользователя.Компьютер = СеансИБ.ИмяКомпьютера; СтрПользователя.Сеанс = СеансИБ.НомерСеанса; СтрПользователя.Соединение = СеансИБ.НомерСоединения; Если СеансИБ.Пользователь <> Неопределено Тогда СтрПользователя.Пользователь = СеансИБ.Пользователь.Имя; СтрПользователя.ИмяПользователя = СеансИБ.Пользователь.ПолноеИмя; СтрПользователя.ПользовательСсылка = НайтиСсылкуПоИдентификаторуПользователя(СеансИБ.По льзователь.УникальныйИдентификатор); Иначе СтрПользователя.Пользователь = ""; СтрПользователя.ИмяПользователя = ""; КонецЕсли; Если СеансИБ.НомерСеанса = НомерСеансаИнформационнойБазы Тогда СтрПользователя.НомерРисункаПользователя = 0; Иначе СтрПользователя.НомерРисункаПользователя = 1; КонецЕсли; КонецЦикла; КоличествоАктивныхПользователей = СеансыИнформационнойБазы.Количество(); СписокПользователей.Сортировать(ИмяКолонкиСортиров ки + " " + НаправлениеСортировки); КонецПроцедуры Выдернул из библиотеки стандартных подсистем 8.2
0
|
0 / 0 / 0
Регистрация: 10.05.2009
Сообщений: 38
|
|
06.12.2010, 18:12 | 5 |
в 8.1 это ПолучитьСоединенияИнформационнойБазы()
Большое спасибо!
0
|
1 / 1 / 0
Регистрация: 15.11.2009
Сообщений: 947
|
|
06.12.2010, 21:48 | 6 |
![]()
0
|
0 / 0 / 0
Регистрация: 24.12.2008
Сообщений: 1,399
|
|
06.12.2010, 21:49 | 7 |
![]()
0
|
06.12.2010, 21:49 | |
Помогаю со студенческими работами здесь
7
Запрос sql на сумму за текущий год и текущий месяц Пользователь и сервер Пользователь отключающий сервер (Centos)
Подключение один пользователь удалённо к наше 1С сервер Как проверить какую radio выбрал пользователь до отправки на сервер? Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |