Hi,
I am trying to get AD authentication via ldap working and the following 
code works, but it seems to be using the
Display Name to logon instead of the sAMAccountName.

If I set the ldap.UserName = 'Tony Caduto' which is my display name the 
authentication works, if I set it to my actual
user ID which is a number i.e. 20658 it fails.

var
ldap:tldapsend;
begin
  ldap := TLDAPSend.Create;
  ldap.TargetHost := 'myhostaddress.com';

  ldap.UserName := '20659';
  ldap.Password := 'mypassword';
  if ldap.Login then
    if ldap.Bind then
      ShowMessage('Success')
    else
      ShowMessage('Failed');

I am totally new to LDAP, but have used synapse before.

Thanks,

-- 
Tony Caduto
AM Software Design
http://www.amsoftwaredesign.com
Home of PG Lightning Admin for Postgresql
Your best bet for Postgresql Administration 



-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public

Reply via email to