Supportnet / Forum / Anwendungen(Java,C++...)

Hi, vorab. Ich bin Anfänger in der VB6/VBA Programmierung! Ich versuche mit VB bzw. VBA Active Directory nach Gruppen abzufragen. Ziel: Eine Gruppe mit gewissen Mitgliedern sollen gewisse Berechtigungen dann vergeben, bzw. verweigert werden. Habe es im Moment leider nur auf OU- und UserEbene geschafft. Aber um eine Gruppe anzusprechen habe ich noch nicht die Befehle gefunden. Vielleicht kann mir ja da einer weiter helfen? Kennt einer von Euch auch vielleicht die Befehlzeilen für Getobject und Get? Kleiner Auszug, wie ich im Moment an die Sache versuche ran zu gehen: Private Sub Command1_Click() Dim objroot, strDomain, strOU, strObjOU, objOU, varUser Dim objUser, strNachname, strVorname ´ Verbindung zur Domäne herstellen Set objroot = GetObject("LDAP://rootDSE") strDomain = objroot.Get("DefaultNamingContext") ´ Benutzer nach der OU abfragen strOU = InputBox("Mit welcher OU soll ein Kontakt hergestellt werden?") ´nur zu Testzwecken ´ Verbindungsstring strObjOU = "LDAP://OU=" & strOU & "," & strDomain ´ OU ansprechen Set objOU = GetObject(strObjOU) For Each varUser In objOU Set objUser = GetObject("LDAP://" & varUser.Name & ",OU=" & strOU & "," & strDomain) objUser.GetInfo strNachname = objUser.Get("sn") strVorname = objUser.Get("userPrincipalName") ´nur zu Testzwecken Print strNachname Print strVorname Gruß thy

• Kleines Netzwerk mit Active Directory
• Mit PHP auf das Active Directory zugreifen
• Probleme mit Active Directory
• Fenstergröße "Eigenschaften" im Active Directory