Имя: Пароль:
1C
 
1с8.2 Работа с пользователями AD
0 Z_Z
 
06.08.14
15:55
Добрый день . Получаю пользователя в AD таким образом
     Отбор=";(&(objectClass=User)(SerialNumber="+УИ+"));AdsPath;subTree";

    ТекстЗапроса="<LDAP://"+Контроллер;

    ТекстЗапросаОтбор=ТекстЗапроса+Отбор;
    Записи=Соединение.Execute(ТекстЗапросаОтбор);
    
     ДСО=ПолучитьCOMОбъект("LDAP:");

     Если Записи.RecordCount > 0 Тогда
        Сообщить("Есть уже  - " + Имя);
                    
         Пользователь = ДСО.OpenDSObject(Записи.Fields(0).Value, Пользователь, Пароль,0);
    КонецЕсли

А как потом получить  группы в какие он входит и к какому OU принадлежит?
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший