Zitat von
renekr:
Hi,
wollte mal fragen ob du schon eine Lösung hast?
Ich bin auch soeben auf der suche nacheiner Gegen Auth. zum AD!
Danke.
Hi,
Über ADSI oder ähnliches hab ich keine Möglichkeit gefunden.
Allerdings konnte ich den Login mit einer anderen Funktion realisieren:
Delphi-Quellcode:
var
h: DWORD;
begin
LogonUser(PChar(Edit1.Text), 'MM', PChar(Edit2.Text), LOGON32_LOGON_NETWORK, LOGON32_PROVIDER_DEFAULT, h);
if h <> 0 then begin
//Login Ok
end else begin
//Login fehlgeschlagen
end;
Weiss nicht ob es dir was bringt?
Grüsse RayJ