Ausgabe einer Liste aller Benutzer und Gruppen: Codebeispiel für Visual Basic .NET (VB.NET) und CSharp (C#)

Code-Beispiel

Ausgabe einer Liste aller Benutzer und Gruppen

Ein Beispiel zum Einsatz der Klasse System.Management.SchemaNameCollection aus der .NET-Klassenbibliothek.

Beschreibung

Um die Benutzer eines Computers oder einer Domäne aufzulisten, ist eine Iteration über den jeweiligen Container notwendig. Der Container enthält aber nicht nur "User"-Objekte, sondern auch andere Objekte (siehe Objekthierarchie). Um die Ergebnismenge auf die Klassen "User" und "Group" zu beschränken, muss die in dem Attribut SchemaFilter enthaltene SchemaNameCollection gefüllt werden.

Programmcodebeispiel in Visual Basic .NET (VB.NET)


    ' --- Demo-Daten für WinNT-Provider

 Const COMPUTER = "mars"



' ============================

' .NET-Code-Beispiel in Visual Basic .NET

' Liste der Benutzer und Gruppen

' (C) Holger@Schwichtenberg.de

' ============================

Sub WINNTBenutzerListe()

 Dim o As DirectoryEntry

 Dim c As DirectoryEntries



 Dim iadscontainer As ActiveDs.IADsContainer



 outtitle("Liste der Domänenbenutzer")



 ' --- Zugriff auf IADs

 o = New DirectoryEntry("WinNT://" & COMPUTER)



 ' --- Wechsel auf Kinderliste

 c = o.Children



 ' --- Setzen des Filters

 Dim snc As SchemaNameCollection

 snc = c.SchemaFilter

 snc.Add("User")

 snc.Add("Group")



 ' --- Liste

 For Each o In c

  out(o.Name)

 Next



End Sub

Weiteres Programmcodebeispiel in CSharp (C#)


           using System;

using System.Collections;

using System.DirectoryServices;



namespace FCLBuch._SystemDirectoryServices {



  public class SamplesADSIWINNT {



    // Demo-Daten für WINNT-Provider

    const string COMPUTER = "mars";

    const string BENUTZER = "HSch";



    public void WINNTBenutzerListe() {



      // Liste der Benutzer

      // ActiveDs.IADsContainer iadscontainer; 



      FclOutput.PrintOutSubHeader("Liste der Domänenbenutzer");



      // Zugriff auf IADs

      DirectoryEntry o = new DirectoryEntry("WinNT://" + COMPUTER);



      // Wechsel auf Kinderliste

      DirectoryEntries c = o.Children;



      // Setzen des Filters

      SchemaNameCollection snc = c.SchemaFilter;

      snc.Add("User");

      snc.Add("Group");



      // Liste

      foreach ( DirectoryEntry de in c )

        FclOutput.PrintOut(de.Name);

    }

}

}

Hinweise

Ausgaben werden in den Beispielen durch Hilfsroutinen wie out() und PrintOut() erzeugt. Diese sind hier nicht angegeben, da deren Implementierung von der jeweiligen Umgebung abhängt. Für Konsolenanwendungen können hier z.B. Console.WriteLine() einsetzen.