Liste des membres d'un Groupe Active DirectorieRésolu

Question

Bonjour a tous,
comment est-il possible de "sortir" la liste des membres d'un groupe de securite AD ?
Existe-t-il deja un outil ou dois-je l'ecrire ?
Merci de votre aide.

Renfield · Accepted Answer

c'est possible, en faisant une requete Active Directory.

Renfield
Admin CodeS-SourceS- MVP Visual Basic

psdvb · Answer

Merci mais encore (un bout de code aurait ete + sympa)...
j'ai finis par trouver 2 choses.
   - tapez la commande netgroupe "NomDuGroupe" sur un serveur AD
   - dsget group -members "CN=mongroup,OU=maOU,DC=domaine,DC=local"

A+

Renfield · Answer

recherches LDAP sur google ou sur VbFrance :

http://www.vbfrance.com/recherche.aspx?r=LDAP&tr=source&dotnet=2

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Quaibaiquer · Answer

Voici le code ( en commentaire) de comment tu peux faire cela en vb.net








//Public Shared Function GetUserMemberOf(ByVal domain As String, ByVal username As String, ByVal password As String, Optional ByRef exeption As Exception = Nothing) As Collections.Generic.List(Of String) 






//Dim searcher As DirectorySearcher = Nothing






//Dim colEntry As New Collections.Generic.List(Of String) 






//Try






//'Objet de notre utilisateur de la hi‚rarchie Active Directory.






//searcher = New DirectorySearcher(New DirectoryEntry("LDAP://" & domain, username, password)) 






//'On va chercher ici un objet de type user et dont le nom d'ouverture de session = .






//searcher.Filter = String.Concat("(&(objectClass=User) (sAMAccountName=", username, "))") 






//'Ne r‚cupŠre que la propri‚t‚ MemberOf.






//searcher.PropertiesToLoad.Add("MemberOf") 






//'Recherche et retourne la premiŠre entr‚e trouv‚e.






//Dim result As SearchResult = searcher.FindOne 






//'Parcours le contenu de la propri‚t‚ MemberOf de notre entr‚e trouv‚e.






//For i As Integer = 0 To result.Properties("MemberOf").Count - 1 






//'R‚cupŠre la chaine LDAP.






//Dim sProp As String = result.Properties("MemberOf")(i) 






//'Extrait le nom du groupe de la chaine.






//colEntry.Add(sProp.Substring(3, sProp.IndexOf(",") - 3)) 






//Next






//Catch ex As Exception 






//exeption = ex






//Finally






//'LibŠre les ressources.






//searcher.Dispose()






//End Try






//Return colEntry 






///
End Function

Liste des membres d'un Groupe Active Directorie

4 réponses

Votre réponse