|
分類:[VB.NET/VB2005 以降]
ローカルPCからサーバーのActiveDirectoryに対してユーザーの追加、およびパスワード設定を行うコンソールアプリケーションを作成しています。
ADを扱う事が初めてですが手探り状態ながらユーザーの追加はできましたがパスワード設定の箇所でエラーが発生し原因が判らず停滞しております。
何かしらのご助言、ご指摘がございましたらよろしくお願い致します。
開発環境:VisualStudio2022
言語:VB
サーバー:WinServer2022
Dim path as string ="LDAP://domainname/DC=ryu-test,DC=com";
Dim adminUser As String = "CN=administrator,CN=users,DC=ryu-test,DC=com"
Dim adminPwd As String = "1234567890"
' Admin権限者でAD接続
Dim drEntry As New DirectoryEntry(path, adminUser, adminPwd, AuthenticationTypes.FastBind)
' ユーザを追加
Dim user As DirectoryEntry = drEntry.Children.Add("CN=addUser,OU=Group", "user")
user.CommitChanges()
'パスワード設定
Dim password As Object() = {"newpassword"}
user.Invoke("SetPassword", password)
--------------------------------------------------
例外がスローされました: 'System.Reflection.TargetInvocationException' (System.DirectoryServices.dll の中)
System.Reflection.TargetInvocationException: 呼び出しのターゲットが例外をスローしました。 ---> System.Runtime.InteropServices.COMException: 1 個以上の入力パラメーターが無効です
--- 内部例外スタック トレースの終わり ---
場所 System.DirectoryServices.DirectoryEntry.Invoke(String methodName, Object[] args)
--------------------------------------------------
|