Feedback

VB - OU´s aus Active Directory auslesen

Veröffentlicht von am 04.11.2015
(0 Bewertungen)
Es kommt vor, das man gerne die OU Container im Active Directory angezeigt bekommen möchte. :-)
Imports System.DirectoryServices
Sub GetOU()
Dim objRootDSE As New DirectoryEntry("LDAP://RootDSE")
Dim dom = objRootDSE.Properties("DefaultNamingContext").Value.ToString()
Dim ds As DirectorySearcher = New DirectorySearcher("LDAP://" & dom)
ds.SearchScope = DirectoryServices.SearchScope.OneLevel
ds.Filter = "(OU=*)"
Dim dirSearchResults As SearchResult
For Each dirSearchResults In ds.FindAll()
console.writeline(dirSearchResults.GetDirectoryEntry().Path.ToString)
Next

End Sub
GFU-Schulungen  [Anzeige]

VB.NET Komplett

Sie stehen vo der Aufgabe, individuelle Anwendungen für Windows zu schreiben. Hier ist VB.NET die optimale Sprache. Sie erlernt sich recht leicht und passt sich komplett in die .NET Umgebung von Microsoft ein. Nach der Schulung entwickeln Sie anwenderfreundliche Programme in VB.NET . Mit den objektorientierten Modellen in VB.NET erzeugen Sie außerdem wiederverwendbare Komponenten.

ASP.NET Core - Der Einstieg

In nur 3 Tagen lernen Sie, wie man mit ASP.NET Core und den Technologien MVC, Entity Framework, WebAPI und Razor professionelle Web-Anwendungs-Architekturen aufbaut. Diese Schulung ist der perfekte Einstieg, um datengetriebene und präsentations-orientierte Applikationen auf Basis der ASP.NET Core Plattform zu erstellen.

Imports System.DirectoryServices
Sub GetOU()
Dim objRootDSE As New DirectoryEntry("LDAP://RootDSE")
        Dim dom = objRootDSE.Properties("DefaultNamingContext").Value.ToString()
        Dim ds As DirectorySearcher = New DirectorySearcher("LDAP://" & dom)
        ds.SearchScope = DirectoryServices.SearchScope.OneLevel
        
        ds.Filter = "(OU=*)"
        Dim dirSearchResults As SearchResult
        For Each dirSearchResults In ds.FindAll()
            console.writeline(dirSearchResults.GetDirectoryEntry().Path.ToString)
        Next

    End Sub
Abgelegt unter ActiveDirectory, OU.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!