Thema: Delphi AD users of group

Einzelnen Beitrag anzeigen

Benutzerbild von cherry
cherry

Registriert seit: 14. Nov 2005
561 Beiträge
 
RAD-Studio 2009 Ent
 
#9

Re: AD users of group

  Alt 16. Jul 2009, 11:56
<edit> ganzer Eintrag editiert

Zitat von Luckie:
Mit LDAP habe ich nie richtig gearbeitet nur mal in der Schule kurz angeguckt. Aber ich konnte mich nicht richtig damit anfreunden. Die Win-APi ist mir da irgenwie lieber, deswegen würde ich es generell nur mit der Win-API machen. Aber das ist Ansichtssache.
Naja, LDAP is ja im Prinzip extra für solche Sachen?!

Also, ich hab die Funktion mal getestet und sie Funktioniert.

Delphi-Quellcode:
function CBF(Member: string; cntMembers: Integer; Data: Pointer): Boolean;
begin
  ShowMessage(Member+#13+IntToStr(cntMembers));
end;

procedure TForm1.EButton1Click(Sender: TObject);
begin
  EnumMembersInGroup('DC01','Administratoren', CallBackFunc, data);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  CallBackFunc := CBF;
end;
Aber jetzt will ich ja die Gruppenmitglieder einer Bestimmten Gruppe im AD und nicht vom lokalen PC / Server. Wie mach ich das jetzt?
beziet sich auch auf:
Zitat von Luckie:
Allerdinsg musst du die Funktionen in der Unit noch etwas überarbeiten, da die Unit bisher noch nicht für eine Benutzerverwaltung auf Domaincontrollern ausgelegt ist.
Nun, kann mir da jemand Helfen?
Ist das nur mein Gefühl, oder ist die ganze Welt verrückt geworden!?
  Mit Zitat antworten Zitat