FiveTech Software tech support forums

This code from Charly, Felix and others is what we were looking for: FUNCTION ConectaLDAP()LOCAL lOk    := FALSETRY// Creamos el objeto ADO de conexión    oConexion:= TOleAuto():new( "ADODB.Connection" )    oConexion:Provider:= 'ADsDSOObject'    oProperties := oCone...

Is this code what we are looking for ?

https://wightideas.org/2014/06/25/excel-ldap-authentication/

We could easily adapt it to Harbour and FWH

I could not authenticate with this code, does it have to pass as consuming with the curl class the code?

UP

... ):Value := 2 // Remote SMTP = 2, local = 1 :Item( "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate" ):Value := iif(cAutmail=="S",1,0) // smtpauthenticate, values are : cdoAnonymous, value 0. Do not authenticate, cdoBasic, ...

... Authorization: Basic VVNXNUFVVFI6UDRVOTNRTUw= Per impostare tale modalità all’interno di un progetto SoapUI, è necessario impostare l’opzione “Authenticate pre-emptively”, come nel progetto di esempio. ****************************** Per me è quasi arabo ! Ho trovato nel nostro forum qualche ...

Just a dumb observation and this may not be the case .. but in order to use Active Directory the MACHINE your customer is using to authenticate your application ( external app I presume ) MUST be a member of the domain. You just can not take any computer that is not part of the domain and ...

Up !

UP

Hi Herbert, have you login Active Directory from FWH ? Perhaps, Mr, Rao could help with this . Thanks in advance. Regards Hi baxajaun, I try 2 aproach oCon := TOleAuto():new("ADODB.Connection")           oCon:Provider := 'ADsDSOObject'           oPro := oCon:Properties(...

Hi Herbert, have you login Active Directory from FWH ? Perhaps, Mr, Rao could help with this . Thanks in advance. Regards Hi baxajaun, I try 2 aproach oCon := TOleAuto():new("ADODB.Connection")           oCon:Provider := 'ADsDSOObject'  &...

Hi Herbert,

have you login Active Directory from FWH ?

Perhaps, Mr, Rao could help with this .

Thanks in advance.

Regards

Thanks a lot Rick !!!

Regards,

Herbert

User-Password ( userPassword ) is an AD attribute, however if you include it in my above code .. it does not resolve and is probably encrypted ..

http://www.kouti.com/tables/userattributes.htm

Rick Lipkin

Sure .. here are the Functions .. Rick lipkin //--------------------Func _NameChk( cNAME, lEMPTY )LOCAL SAYINGIF empty(lEMPTY)   lEMPTY := .F.ENDIFIF lEMPTY = .F.   IF empty(alltrim(cNAME )) .or. cNAME = "  "      SAYING := "Sorry .. This field can not ...