Discussion :

[Alexandre T]

Bonjour,

J'utilise Powerbuilder (eh oui...). Je dois mettre en place un système de connexion utilisant le LDAP. Donc j'ai beau parcourir ce forum, la MSDN, je ne trouve que des exemples en VB ou en Delphi qui utilisent des objets implémentés dans le langage en lui-même.

PowerBuilder ( 8.0 ) est un peu aux paquerettes (et depuis longtemps) donc je n'ai rien dans la doc PB qui parle du LDAP. Le cotnraire m'aurait étonné. Je cherche donc des DLLs ou des objets COM qui me permettrait de valider une authentfication.

Voilà l'algorithme que je veux faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
1-L'utilisateur entre son login et son mot de passe
2-J'envoie cela au LDAP
3-Je récupère true ou false

Rien de sorcier. Mais comment j'interroge ce LDAP, par quel objet je passe ? J'ai lu des trucs sur la adsldp.dll , mais aucun point d'entrée dan cette DLL. Où puis je trouvé celà ? J'ai pourtant bien lu que cela fonctionnait comme les API !

[Alexandre T]

J'ai trouvé la solution, il s'agit de la DLL ADVAPI.DLL
Il faut utiliser la fonction USERLOGON

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
LogonUser
The LogonUser function attempts to log a user on to the local computer. The local computer is the computer from which LogonUser was called. You cannot use LogonUser to log on to a remote computer. You specify the user with a user name and domain, and authenticate the user with a plaintext password. If the function succeeds, you receive a handle to a token that represents the logged-on user. You can then use this token handle to impersonate the specified user or, in most cases, to create a process that runs in the context of the specified user.

BOOL LogonUser(
  LPTSTR lpszUsername,
  LPTSTR lpszDomain,
  LPTSTR lpszPassword,
  DWORD dwLogonType,
  DWORD dwLogonProvider,
  PHANDLE phToken
);

Ce qui donne sous Powerbuilder :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Déclaration dans les Local Externale Function de mon objet  :
FUNCTION boolean LogonUserA(ref string uname,ref string domain,ref string password,ulong ptype,ulong provider,ref long token) LIBRARY "ADVAPI32.DLL"

//déclaration dans les variables d'isntances de mon objet arbitrairement nommé n_cst_ldap :
CONSTANT INTEGER LOGON32_LOGON_NETWORK 				= 3
CONSTANT INTEGER LOGON32_LOGON_INTERACTIVE 			= 2
CONSTANT INTEGER LOGON32_LOGON_BATCH 					= 4
CONSTANT INTEGER LOGON32_LOGON_NETWORK_CLEARTEXT 	= 8
CONSTANT INTEGER LOGON32_LOGON_NEW_CREDENTIALS 		= 9
CONSTANT INTEGER LOGON32_LOGON_SERVICE 				= 5
CONSTANT INTEGER LOGON32_LOGON_UNLOCK	 				= 7

CONSTANT INTEGER LOGON32_PROVIDER_DEFAULT			   = 0
CONSTANT INTEGER LOGON32_PROVIDER_WINNT35			   = 1
CONSTANT INTEGER LOGON32_PROVIDER_WINNT40			   = 2
CONSTANT INTEGER LOGON32_PROVIDER_WINNT50			   = 3


//Exemple d'utilisation
lb_debug = LOGONUSERA( ref as_user, ref as_domain, ref as_mdp, LOGON32_LOGON_NETWORK , LOGON32_PROVIDER_DEFAULT, ref ll_handle)

[mamid1706]

Bonjour,

Je voudrais faire la même chose mais je travail sur plusieurs type de systèmes. En particulier, 2003 et 2000, mais, le problème, c'est que, visiblement, la DLL n'est pas définie dans ces deux systèmes (J'ai un message d'erreur trouvant pas la fonction LOGONUSERA).

Merci.

[rivebise]

Bonjour,

j'ai le même problème. Donc si quelqu'un à la solution je suis preneur.

Merci
Rivebise

Bonjour,

Je voudrais faire la même chose mais je travail sur plusieurs type de systèmes. En particulier, 2003 et 2000, mais, le problème, c'est que, visiblement, la DLL n'est pas définie dans ces deux systèmes (J'ai un message d'erreur trouvant pas la fonction LOGONUSERA).

Merci.