2009-05-06 11 views

答えて

0

私はそれをやったことがないが、私はADO経由でLDAPクエリが含まれている読んだが、実際のプロバイダ名や必要な接続文字列を知りません。いくつかの例については、このサイトでADへのLDAPクエリに関する記事を検索することができます。それらはAccessの回答ではありませんが、Accessで何をすべきかを示す可能性があります。

2

はこのような何かを試してみてください:

'Use ADO and LDAP to return all users in Active Directory 
Dim objRecordSet As Object 
Dim objCommand As Object 
Dim objConnection As Object 

Const ADS_SCOPE_SUBTREE = 2 

Set objConnection = CreateObject("ADODB.Connection") 
Set objCommand = CreateObject("ADODB.Command") 
objConnection.Provider = "ADsDSOObject" 
objConnection.Open "Active Directory Provider" 
Set objCommand.ActiveConnection = objConnection 

objCommand.Properties("Page Size") = 1000 
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE 
objCommand.Properties("Sort On") = "Name" 

objCommand.CommandText = _ 
    "SELECT Name FROM 'LDAP://dc=<enter domain controler server name here>,dc=<enter full AD domain name here>' WHERE objectCategory='user'" 
Set objRecordSet = objCommand.Execute 

objRecordSet.MoveFirst 
Do Until objRecordSet.EOF 
    Debug.Print objRecordSet.Fields("Name").Value 
    objRecordSet.MoveNext 
Loop 

これは、ユーザーのリストを取得する必要があります。ドメインコントローラのサーバー名とADドメイン名を指定する必要があります。

ホープこれはAccessで マーク

関連する問題