Добавить пользователей в группу

Форум Программирование Общие вопросы программирования (Dev)

1. user1950869 01.06.23 11:54 Сейчас в теме

Добрый день! Подскажите пожалуйста, в настоящее время требуется найти пользователей которые входят в определенную группу (справочник ГруппыПользователей - Администратор тестовой базы).
После требуется данных пользователей добавить в другие группы "Открытие внешних обработок" и "Администратор", не совсем ясно как реализовать (
Бух 8.3

ГруппаДоступа = Справочники.ГруппыПользователей.НайтиПоНаименованию("Администратор тестовой базы");   

ГруппаДоступаАдм = Справочники.ГруппыПользователей.НайтиПоНаименованию("Администраторы").ПолучитьОбъект();
ГруппаДоступаОткрОбработок = Справочники.ГруппыПользователей.НайтиПоНаименованию("Открытие внешних обработок").ПолучитьОбъект();
Запрос = Новый Запрос;
Запрос.Текст =
  "ВЫБРАТЬ
  |   СоставыГруппПользователей.Пользователь КАК Пользователь
  |ИЗ
  |   РегистрСведений.СоставыГруппПользователей КАК СоставыГруппПользователей
  |ГДЕ
  |   СоставыГруппПользователей.ГруппаПользователей = &ГруппаПользователей";
Запрос.УстановитьПараметр("ГруппаПользователей",ГруппаДоступа);
РезультатЗапроса = Запрос.Выполнить();
Если РезультатЗапроса.Пустой() Тогда 
   Сообщение = Новый СообщениеПользователю;
   Сообщение.Текст = "Результат пустой";
   Сообщение.Сообщить();       
Иначе
Выборка = РезультатЗапроса.Выбрать();
Пока Выборка.Следующий() Цикл 

КонецЦикла;   
КонецЕсли;

Показать

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. ilnur75 01.06.23 15:31 Сейчас в теме

для начала в режиме пользователя проделайте

Оставьте свое сообщение

E-mail: