2010-07-29 88 views
2

我一直在網上搜索了一段時間,仍然無法找到對此主題有用的任何內容。從Infopath表單創建Active Directory中的用戶

我想創建的是我的Infopath窗體中的一個按鈕,它將在Active Directory中創建一個用戶帳戶。代碼將需要通過存儲在Infopath表單域中的信息。

我選擇使用Visual Basic,因爲我相信這是一種很好的AD語言腳本。當我點擊我的InfoPath按鈕在VB對話框

我已經成功地運行此代碼:

Sub CTRL1_12_OnClick(eventObj) 

MsgBox "Output: " 

End Sub 

返回:「輸出」。然而,當我嘗試:

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)以更好地格式化和語法突出顯示它! – 2010-07-29 15:07:03

+0

會做,沒有看到,謝謝! – McPeter 2010-07-29 16:07:28

回答

1

我現在已經發現問題是什麼。我需要將表單設置爲'完全信任'工具>表單選項>安全和信任。我也必須在證書上簽名。

現在我可以運行該按鈕的代碼。

1

我會建議你看看Richard Mueller的網站 - 他有大量的VBScript代碼來做各種各樣的AD東西。

這裏是一個link to a page顯示如何創建用戶 - 是幫助?我不是一個VBScript程序員,但我知道理查德的東西通常是非常好的和有用的。

這是他的整個list of free VBScript code爲你去翻找!

+0

非常感謝,他的網站看起來不錯,我可能能夠使用他的代碼,一旦我發現爲什麼這段代碼在Infopath中不起作用,但在我的桌面上的獨立vbs腳本中運行良好。 彼得 – McPeter 2010-07-29 16:06:33

相關問題