PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Wd 10 LDAP
Wd 10 LDAP
Débuté par thepsychokillah, 09 jan. 2006 17:56 - 4 réponses
Posté le 09 janvier 2006 - 17:56
Quelqu un a t il réussi a se connecter à son Active Directory et à faire fonctionner ces fonctions ??? voici mon code

bVerif est un booléen
sHotepik est une chaîne
sUserpik est une chaîne
sPasswd est une chaîne
bPingpik est un booléen

sHotepik = "xxxx.fr"
sUserpik = "admin"
sPasswd = "****"
bPingpik = Ping("xxxx.fr")
LDAPRAZ()
LDAPSession.Hote = sHotepik
LDAPSession.Port = 53
LDAPSession.Version = 2
LDAPSession.Utilisateur = sUserpik
LDAPSession.MotDePasse = sPasswd
bVerif = LDAPConnecte(sUserpik)

g une erreur délai time out alors que le serveur répond bien au ping je comprend pas évidemment je saisis les bonnes infos de domaine et utilisateur admin du domaine et le mot de passe qui va avec voila helllllllllpppppppppp me plizzzz
bon Dev a vous aussi Greg
Posté le 09 janvier 2006 - 18:24
Salut,

Quelqu un a t il réussi a se connecter à son Active Directory et à
faire fonctionner ces fonctions ???


Oui, pas de problème.
sHotepik = "<Adresse IP du serveur>"
sUserpik = "<MonDomaineNetBios>\<Utilisateur>"
sPasswd = "<MotDePasseUtilisateur>
LDAPRAZ()
LDAPSession.Hote = sHotepik
// LDAPSession.Port = 53 // je ne précise pas : valeur par défaut 389
// LDAPSession.Version = 2 // je ne précise pas valeur par défaut 2
LDAPSession.Utilisateur = sUserpik
LDAPSession.MotDePasse = sPasswd
bVerif = LDAPConnecte(sUserpik)

--> bVerif=Vrai

--
Erick Bavut, Fiduciaire informatique
erick.bavut@[nospam]lafidu.com

* enlevez [nospam] pour m'écrire directement
Posté le 09 janvier 2006 - 19:06
Effectivement en mettant
sUserpik = "<Utilisateur>@<MonDomaine>"
cela fonctionne
Posté le 10 janvier 2006 - 10:33
Merciiiii a tous ca marche nikel !!!! Bon dev @ tous
Posté le 10 janvier 2006 - 11:38
Autre petit soucis dans toutes les autres fonctions LDAP apparait dans la syntaxe <DN> a quoi cela correspond t-il concrètement merci