VB.NET - Comment faire pour Convertir SID de Nom de Groupe avec Active Directory

À l'aide de VB.NET, Comment voulez-vous Convertir le sid de Nom de Groupe avec Active Directory?

exemple: j'ai besoin de pour obtenir "group_test" et pas de "S-1-5-32-544"

Le code que j'utilise est:

Public ReadOnly Property Groups As IdentityReferenceCollection
    Get

        Dim irc As IdentityReferenceCollection
        Dim ir As IdentityReference
        irc = WindowsIdentity.GetCurrent().Groups
        Dim strGroupName As String

        For Each ir In irc
            Dim mktGroup As IdentityReference = ir.Translate(GetType(NTAccount))
            MsgBox(mktGroup.Value)
            Debug.WriteLine(mktGroup.Value)
            strGroupName = mktGroup.Value.ToString

        Next

        Return irc

    End Get
End Property

ou quelque chose comme ça?

        currentUser = WindowsIdentity.GetCurrent()

        For Each refGroup As IdentityReference In currentUser.Groups

            Dim acc As NTAccount = TryCast(refGroup.Translate(GetType(NTAccount)), NTAccount)
            If AdminGroupName = acc.Value Then
                ret = "999"
            End If
            If UsersGroupName = acc.Value Then
                ret = "1"
            End If

comment les adapter à ce code? (si l'utilisateur est dans le groupe des xx, montrent groupe des xx sur la liste déroulante)

        For Each UserGroup In WindowsIdentity.GetCurrent().Groups
            If mktGroup.Value = "BIG" Then
                Dim Company = ac1.Cast(Of MarketingCompany).Where(Function(ac) ac.MarketingCompanyShort = "BIG").FirstOrDefault
                If Company IsNot Nothing Then
                    marketingCo.Items.Add(String.Format("{0} | {1}", Company.MarketingCompanyShort, Company.MarketingCompanyName))
                End If
            End If
        Next

InformationsquelleAutor Brian McCarthy | 2011-05-02

2

Ici est un moyen simple écrit en C#, je pense que c'est pas dur de s'adapter :
```
  /* Retreiving object from SID
  */
  string SidLDAPURLForm = "LDAP://WM2008R2ENT:389/<SID={0}>";
  System.Security.Principal.SecurityIdentifier sidToFind = new System.Security.Principal.SecurityIdentifier("S-1-5-21-3115856885-816991240-3296679909-1106");

  DirectoryEntry userEntry = new DirectoryEntry(string.Format(SidLDAPURLForm, sidToFind.Value));

  string name = userEntry.Properties["cn"].Value.ToString();
```
Ici, il est en VB .NET grâce à RÉFLECTEUR
```
Dim SidLDAPURLForm As String = "LDAP://WM2008R2ENT:389/<SID={0}>"
Dim sidToFind As New SecurityIdentifier("S-1-5-21-3115856885-816991240-3296679909-1106")
Dim userEntry As New DirectoryEntry(String.Format(SidLDAPURLForm, sidToFind.Value))
Dim name As String = userEntry.Properties.Item("cn").Value.ToString
```
---- MODIFIÉ -----
Donc, voici ce que l'on veut, mais c'est la même que celle qui a été donné précédemment par @BiggsTRC
```
Private Shared Sub Main(args As String())
    Dim currentUser As WindowsIdentity = WindowsIdentity.GetCurrent()

For Each iRef As IdentityReference In currentUser.Groups
        Console.WriteLine(iRef.Translate(GetType(NTAccount)))
    Next
End Sub
```
- merci pour votre réponse. Pouvez-vous expliquer ce que ce code fait? Ai-je besoin de coder en dur pour chaque SID séparément?
- Désolé, je ne comprends pas votre question. ce code de traduire un SID à un nom de groupe, basée sur Active Directory. Il vous suffit de créer une méthode avec une chaîne de caractères comme argument sur le dessus de cela.
- où êtes-vous d'obtenir la valeur "S-1-5-21-3115856885-816991240-3296679909-1106"?
- Je l'ai eu à partir d'un groupe de mon Active Directory. Votre question est "Comment faire pour Convertir SID de Nom de Groupe avec Active Directory" ? J'ai donc pris un SID à partir de mon ANNONCE et vous donner le code pour convertir un nom de groupe.
- Peut-être, je me suis poser la mauvaise question. Je suis à la recherche pour correspondre à un nom de groupe et de voir si il en existe un pour le courant de l'utilisateur connecté, mais tout ce que j'obtiens est peid. permettez-moi de poser une nouvelle question. vérifiez le code ajouté à la question ci-dessus.
- - Je modifier ma réponse, mais vous la question n'était pas si clair :o)
- Merci pour votre réponse!
InformationsquelleAutor JPBlanc
7

Code en C#:
```
    public static string GetGroupNameBySid(string sid)
    {
        PrincipalContext ctx = new PrincipalContext(ContextType.Domain);
        GroupPrincipal group = GroupPrincipal.FindByIdentity(ctx, IdentityType.Sid, sid);
        return group.SamAccountName;
    }
```
Vous devez ajouter de l'assemblée System.DirectoryServices.AccountManagement.dll.
Si vous avez des problèmes avec connexion à l'AD, vous pouvez essayer d'ajouter AD serveur de nom dans PrincipalContext constructeur.
- merci pour votre réponse! Vous voulez dire que je devrais ajouter les "Importations Système.DirectoryServices.AccountManagement" par Défaut.aspx.vb? Où dois-je déclarer la PrincipalContext constructeur? Je suis à la recherche sur le site web MSDN à l'adresse msdn.microsoft.com/en-us/library/..., msdn.microsoft.com/en-us/library/..., et les méthodes suivantes: GetGroups, GetGroups(PrincipalContext), IsMemberOf(PrincipalContext, IdentityType, String), IsMemberOf(GroupPrincipal).
- Clic droit sur la référence de votre projet, puis "Ajouter une Référence...". Dans .NET onglet rechercher "du Système.DirectoryServices.AccountManagement composante" et double-cliquez dessus ou appuyez sur la touche OK. Vous n'avez pas besoin de déclarer PrincipalContext constructeur, car cette classe est déjà définie dans l'assemblée ajouté ci-dessus. J'utilise un argument du constructeur dans l'exemple. Si vous avez des ennuis avec connexion à l'AD (je n'ai pas eu, mais peut-être que cela peut se produire si votre ANNONCE client (par exemple, votre application) n'est pas dans le domaine), vous pouvez utiliser deux arguments constructeur de PrincipalContext et passer AD serveur de nom d'hôte comme deuxième argument.
- Briliantly! Juste ce que je cherchais
InformationsquelleAutor meir
3

Voici un lien pour savoir comment convertir un SID à un nom: http://vbdotnet.canbal.com/view.php?sessionid=JEf85K%2B%2BeBj9Pz%2BWz9hJJicW%2FYEPtADXfcpYCovZ7js%3D

Fondamentalement, vous obtenez un DirectoryEntry objet que vous pouvez ensuite utiliser pour obtenir le nom. Toutefois, si vous êtes à la recherche pour ce que je crois être une méthode plus facile pour ce faire, il suffit de prendre l'utilisateur en cours et d'effectuer une recherche de pub pour leur groupe d'appartenance. Voici un exemple de comment faire (vous aurez besoin de la plus grande de l'article réellement accomplir votre tâche, mais ce code est la réponse précise à votre question): http://www.codeproject.com/KB/system/everythingInAD.aspx#39

Désolé pour le fait que le code est en C#. Toutefois, vous devriez être en mesure de simplement utiliser un convertisseur pour convertir VB.NET sans un problème.

Obtenir de l'Utilisateur Appartenances de l'Utilisateur Connecté à partir de ASP.NET en C#
```
public ArrayList Groups()
{
    ArrayList groups = new ArrayList();

    foreach (System.Security.Principal.IdentityReference group in
            System.Web.HttpContext.Current.Request.LogonUserIdentity.Groups)
    {
        groups.Add(group.Translate(typeof
        (System.Security.Principal.NTAccount)).ToString());
    }

    return groups;
 }
```
Obtenir de l'Utilisateur Appartenances de l'Utilisateur Connecté à partir de ASP.NET dans VB.NET à l'aide de Développeur Fusion est un Outil de conversion:
```
    Public Function Groups() As ArrayList
        Dim groups__1 As New ArrayList()

        For Each group As System.Security.Principal.IdentityReference In                 System.Web.HttpContext.Current.Request.LogonUserIdentity.Groups

               groups__1.Add(group.Translate(GetType(System.Security.Principal.NTAccount)).ToString())
        Next

    Return groups__1
    End Function
```
- merci pour votre réponse. pouvez-vous poster un exemple de code?
InformationsquelleAutor IAmTimCorey

Vous devez vous connecter pour publier un commentaire.