- PR -

ActiveDirectoryのアカウント検索方法について

1
投稿者投稿内容
arc
会議室デビュー日: 2003/12/19
投稿数: 2
投稿日時: 2004-01-22 15:07
vb.netでActivedirectoryのアカウント検索方法がありましたら教えてください。
アカウントの登録と削除はできたのですが、それらの処理をする前に
そのアカウントがあるかどうかのチェックをしたいです。


アカウントが無いサーバーに対して下のソースで処理をしてしまうと
「サーバーにそのようなオブジェクトはありません。」と出るのでそれを避けたいです。



↓ソース

objDs As ActiveDs.IADsOpenDSObject
objContainer As ActiveDs.IADsContainer
objNewUser As ActiveDs.IADsUser

strDomainController = "LDAP://xxx.xxx.xxx.xxx/" & "CN=Users," _
& "DC=xxxxxx," & "DC=xxxxxx," & _
"DC=xx," & "DC=xx"
objDs = GetObject("LDAP:")

objContainer = objDs.OpenDSObject(strDomainController, "xxxxxx", _
"xxxxxxxx", _
ActiveDs.__MIDL___MIDL_itf_ads_0000_0018.ADS_SECURE_AUTHENTICATION)



'ドメインアカウント削除処理
objContainer.Delete("User", "CN=testuser")


[ メッセージ編集済み 編集者: arc 編集日時 2004-01-22 15:07 ]
なな
ぬし
会議室デビュー日: 2003/06/22
投稿数: 659
お住まい・勤務地: 愛知県
投稿日時: 2004-01-26 08:08
For Eachで列挙して、目的のユーザーが存在する場合は削除を実施してはいかがでしょうか?

For Each userObject in objContainer
If ... Then
...
End If
Next

# .NETであれば、ADSIではなく、System.DirectoryServicesを使う方法もあります。
1

スキルアップ／キャリアアップ（JOB@IT）