uLDAP, keine Verbindung

[marabu]

Hallo,

du solltest die Verbindung auch festhalten und nicht einfach wegwerfen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Server := '172.16.20.2';
  Port := 389;
  UserDN := 'cn=steffen,ou=VT,ou=HQ,o=DM';
  // Ich habe auch schon probiert: UserDN:='steffen,VT,DM';
  UserPW:='apap';
  ldap := LDAPConnection.Create;
  ldap.Host := Server;
  ldap.Port := Port;
  ldap.BindDN := UserDN;
  ldap.BindPwd := UserPW;
  try
    try
      ldap.Open();
      ShowMessage('ldap da');
    except
      ShowMessage('ldap nicht da');
    end;  
  finally
    ldap.Free;  // nicht Destroy() verwenden!
  end;
end;

Deklariere LDAP als private Form-Variable.

Ob dein UserDN wirklich stimmt, dass kannst nur du wissen.

Grüße vom marabu