Thema: Delphi AD users of group

Einzelnen Beitrag anzeigen

haraldr

Registriert seit: 16. Jan 2008
Ort: Saggsn
8 Beiträge
 
Delphi XE Enterprise
 
#14

AW: AD users of group

  Alt 19. Okt 2011, 17:05
Die Zeit vergeht... die Fragen bleiben die Gleichen

Ich werde gerade mit dem Problem konfrontiert, aus einem in Delphi(Pascal) geschriebenem Programm festzustellen, ob ein ADUser einer bestimmten ADGroup angehört. Zunächst einmal vielen Dank an Luckie und cherry für die Beiträge. Im Prinzip war es genau das, was ich suchte.
Habe also in meinem Programm die API Funktion NetGroupGetUser aufgenommen, bekomme aber generell den GroupNotFound Errorcode zurück. Ich benutze folgende Codezeile:
Code:
var
   Servern: string;
   Groupn: string;

...
NetError := NetGroupGetUsers(PWideChar(Servern), PWideChar(Groupn), 0, Member, MAX_PREFERRED_LENGTH,
      EntriesRead, EntriesTotal, nil);
...
Für Servern gebe ich den Namen des entsprechenden PC an, z.B. "DC001.network1.local", für Groupn die gewünschte Gruppe, z.B. "Administratoren".

Kann mir jemand auf die Sprünge helfen?

Beste Grüße
H.
  Mit Zitat antworten Zitat