none
Active Directory, determinar si un usuario pertenece a un grupo. RRS feed

  • Pregunta

  • Hola:

    Tengo un código para saber si un usuario pertenece a un Grupo del ActiveDirectory, y funciona bien pero le falta la 'recursividad'. El código es así:

    Set oGroup = GetObject("WinNT://Dominio/Grupo,group")
    If oGroup.IsMember("WinNT://Dominio/Usuario") Then
       ' Esto funciona si el usuario está incluido directamente en el Grupo como usuario.
       ' Pero si el Grupo está formado por SubGrupo1 y SubGrupo2, y el usuario pertenece al 
       ' SubGrupo2, no lo encuentra.

    Entonces, intento 'recorrer' los subgrupos que componen el grupo, pero en VBA no me los recorre. He intentado esto:

    Dim oGrpNested As Object
    For Each oGrpNested In oGroup.Groups
       Debug.Print oGrpNested.Name
    Next
    ' El grupo tiene 2 subgrupos, pero no me lista ninguno.

    ¿ Como puedo saber si un usuario pertenece a un grupo formado por subgrupos?

    Un saludo

    miércoles, 5 de febrero de 2020 11:44