从Infopath表单在Active Directory中创建用户

Question

我已经在网上搜索了一段时间，似乎仍无法找到有关此主题的任何内容。

我想要创建的是Infopath表单中的一个按钮，它将在Active Directory中创建一个用户帐户。代码需要提取存储在Infopath表单字段中的信息。

我选择使用Visual Basic，因为我认为这是一个很好的语言脚本与AD。

我已成功运行此代码：

Sub CTRL1_12_OnClick(eventObj)

MsgBox "Output: "

End Sub

当我点击我的infopath按钮时，

返回：'输出：'在VB对话框中。但是，当我尝试：

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文件然后执行运行正常并在活动目录中创建用户，我不明白为什么当我运行相同的代码时它不会工作

Answer 1

我建议你查看Richard Mueller的网站 - 他有大量的VBScript代码来做各种广告。

这是一个显示如何创建用户的link to a page - 是帮助吗？我不是一个VBScript程序员，但我知道理查德的东西通常非常好用。

这是他整个list of free VBScript code供你翻找！

Answer 2

我现在发现了问题所在。我需要将表单设置为“完全信任”工具＆gt;表单选项＆gt;安全与信任。我还必须用我的证书签署表格。

现在我可以从该按钮运行代码了。