Einzelnen Beitrag anzeigen

Benutzerbild von Piro
Piro

Registriert seit: 14. Jul 2003
Ort: Flintbek
810 Beiträge
 
Delphi XE2 Professional
 
#1

kleines VB Script in Delphi - MemberOf Domängruppe

  Alt 17. Jan 2007, 23:43
Abend,

sitze nun schon ein Weile vor meinem Laptop und suche nach einer Lösung. Folgend Code habe ich in VBS:
Code:
On Error Resume Next
 
Set objGroup = GetObject _
  ("LDAP://cn=<Gruppe>,ou=<Organisationseinheit>,dc=...,dc=...")
objGroup.GetInfo
 
arrMemberOf = objGroup.GetEx("member")
 
WScript.Echo "Members:"
For Each strMember in arrMemberOf
    WScript.echo strMember
Next
Ich weiß ehrlich gesagt nicht wie ich ihn in Delphi umsetzen soll. Das Ergebnis soll sein, dass ich die Mitglieder einer Domänengruppe erhalte. Eventuell gehts auch anders.

Für Anregungen oder Lösungsvorschläge wäre ich dankbar.

Gruß
  Mit Zitat antworten Zitat