Utilisez la liste des utilisateurs de l'annuaire actif dans une liste déroulante dans MS Access 2007

Question

Au travail, nous avons Windows Server 2003. Dans ma base de données d'accès, j'ai besoin de lier les données utilisateur/groupe afin qu'il puisse remplir une liste déroulante liste et peut donc être associé à des enregistrements de base de données. Est-ce que quelqu'un sait comment faire ça?

Merci,

Chris

Answer 1

Je ne l'ai jamais fait, mais j'ai lu qui implique des requêtes LDAP sur ADO, mais ne sais pas le nom du fournisseur réel ou les chaînes de connexion nécessaires. Vous pouvez rechercher sur ce site des articles sur les requêtes LDAP vers AD pour des exemples. Ils ne seront pas des réponses Access, mais ils pourraient vous montrer ce qu'il faut faire dans Access.

Answer 2

Essayez quelque chose comme ceci:

'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 

Cela devrait obtenir la liste des utilisateurs. Notez que vous devrez fournir le nom du serveur du contrôleur de domaine et le nom du domaine AD.

Hope this helps Mark

Answer 3

I AD juste intégré avec Access. Voici une bonne explication et un exemple de code: http://www.accesssecurityblog.com/post/2011/02/05/Securing-Access-databases-using-Active-Directory.aspx