|
1c, AD, LDAP и put под другой учеткой... | ☑ | ||
|---|---|---|---|---|
|
0
Один С
26.09.12
✎
21:18
|
не выходит каменный цветок..
АДОКоннектор = Новый COMОбъект("ADODB.Connection"); АДОКоннектор.Open("Provider=ADSDSOObject; USER ID=SuperUser ; Password=SuperUserPWD "); ТекстЗапроса = "<LDAP://server1>;(&(objectCategory=person)(objectClass=user)(cn="+ЭтотОбъект.Наименование+")(!(userAccountControl:1.2.840.113556.1.4.803:=2)));AdsPath;subtree"; ВыборкаАДО = АДОКоннектор.Execute(ТекстЗапроса); Пока НЕ ВыборкаАДО.EOF Цикл ПутьОбъекта = ВыборкаАДО.Fields(0).Value; ОбъектАД = ПолучитьCOMОбъект(ПутьОбъекта); ОбъектАД.Put("mobile", "123"); ОбъектАД.SetInfo(); ВыборкаАДО.MoveNext(); КонецЦикла; АДОКоннектор.Close(); На строке ОбъектАД.Put("mobile", "123"); ругается, что-то типа "Отказано в доступе".. Фактически, я подключаюсь к AD не под SuperUser'ом, которого указал во 2 строке, а под собой. И, таки да, у меня нет прав. А у SuperUser'а есть. Как быть? Почему игнорируется строка 2? Чисто теоретически, разобраться в вопросе, возможно помогла бы вот эта обработка http://infostart.ru/public/125681/ хотя и не уерен.. |
|||
|
1
Один С
26.09.12
✎
21:25
|
АДОКоннектор = Новый COMОбъект("ADODB.Connection");
АДОКоннектор.Open("Provider=ADSDSOObject; USER ID=SuperUser ; Password=SuperUserPWD "); ТекстЗапроса = "<LDAP://server1>;(&(objectCategory=person)(objectClass=user(cn="+ЭтотОбъект.Наименование+")(!(userAccountControl:1.2.840.113556.1.4.803:=2)));AdsPath;subtree"; ВыборкаАДО = АДОКоннектор.Execute(ТекстЗапроса); Пока НЕ ВыборкаАДО.EOF Цикл ПутьОбъекта = ВыборкаАДО.Fields(0).Value; ОбъектАД = ПолучитьCOMОбъект(ПутьОбъекта); ОбъектАД.Put("mobile", "123"); ОбъектАД.SetInfo(); ВыборкаАДО.MoveNext(); КонецЦикла; АДОКоннектор.Close(); |
|||
|
2
Jaap Vduul
26.09.12
✎
21:43
|
Лишние пробелы из строки подключения убери...
|
|||
|
3
Один С
27.09.12
✎
14:19
|
(2) невзлетело
|
|||
|
4
Rodion994
23.10.12
✎
03:55
|
Тоже столкнулся с подобной задачей.
Удалось выяснить причину проблемы ? |
| Форум | Правила | Описание | Секции | Поиск |