Try
            Dim adAuth As LdapAuthentication = New LdapAuthentication(adPath)
 
            If (True = adAuth.IsAuthenticated(txtDomain.Text, txtusername.Text, _
              txtpassword.Text)) Then
                Dim groups As String = adAuth.GetGroups()

Auf der Suche nach einem Hilfreichen Tutorial? Dann schau vorbei, auf http://tuts4you.de