Компонент ActiveX не может создать объект: «GetObject» Infopath

Question

Я пытаюсь создать нового пользователя в ActiveDirectory со следующим кодом:

Sub CTRL1_12_OnClick(eventObj)
 Set objOU = GetObject("LDAP://OU=Users,dc=mfcvt,dc=local")
 Set objUser = objOU.Create("User", "cn=MyerKen")
 objUser.Put "sAMAccountName", "myerken"
 objUser.SetInfo
End Sub

Этот код запускается из Infopath, когда я нажимаю кнопку CTRL1_12. Но когда я запускаю все это, я получаю эту ошибку:

Infopath cannot complete this action, because of an error in the form's code.    
The following error occurred:

        ActiveX component can't create object: 'GetObject'
        File:script.vbs
        Line:20

Спасибо за внимание

Peter

Answer 1

См. Создание пользователя в Active Directory из формы Infopath для ответа