2010-07-29 1 views
2

Я искал в Интернете какое-то время и все еще не могу найти ничего полезного в этой теме.Создайте пользователя в Active Directory из формы Infopath

То, что я пытаюсь создать, - это кнопка в моей форме Infopath, которая создаст учетную запись пользователя в Active Directory. Код должен будет извлекать информацию, хранящуюся в полях формы Infopath.

Я решил использовать Visual Basic, так как считаю, что это хороший язык с AD.

Я успешно запустить этот код:

Sub CTRL1_12_OnClick(eventObj) 

MsgBox "Output: " 

End Sub 

, которая возвращает: «Вывод:» в диалоговом окне VB, когда я нажимаю на моей кнопке InfoPath. Однако, когда я пытаюсь:

Set objOU=GetObject("LDAP://OU=People,OU=contoso,DC=contoso,DC=com") 

Set objUser=objOU.Create("user","CN=Linda Mitchell") 

objUser.Put "sAMAccountName","linda.mitchell" 

objUser.SetInfo() 

Все, что я получаю сообщение об ошибке в Infopath произошла

следующая ошибка:

ActiveX компонент не может создать объект: 'GetObject' Файл: script.vbs Линия: 14

Когда я помещаю тот же код в блокнот, сохраняем его как файл vbs, а затем выполняем отлично и создаем пользователя в активном каталоге я не понимаю, почему, когда я запускаю тот же код, он не работает.

+0

Если вы отправляете код или XML, ** пожалуйста ** выделите эти строки в текстовом редакторе и нажмите кнопку «код» (101 010) на панели инструментов редактора, чтобы красиво отформатировать и выделить синтаксис! –

+0

сделаю, не видел, спасибо, спасибо! – McPeter

ответ

1

Теперь я выяснил, в чем проблема. Мне нужно было установить форму для «полного доверия» «Инструменты»> «Параметры формы»> «Безопасность и доверие». Мне также пришлось подписать форму с моим сертификатом.

Теперь я могу запустить код с этой кнопки.

1

Я бы порекомендовал вам проверить сайт Ричарда Мюллера - у него есть тонны кода VBScript, чтобы делать все виды материалов AD.

Вот link to a page, показывающий, как создавать пользователей - это помощь? Я не очень программист VBScript, но я знаю, что материал Ричарда обычно очень хорош и полезен.

Вот его весь list of free VBScript code для вас, чтобы идти рыться!

+0

Спасибо за это, его сайт выглядит довольно хорошо, и я могу использовать его код, когда узнаю, почему этот код не работает в Infopath, но отлично работает в автономном скрипте vbs на моем рабочем столе. Peter – McPeter

Смежные вопросы