Je cherche à récupérer des informtions du LDAP.
J'utilise une requête SQL pour l'interroger,
1 2 3 4
| ADOQuery.SQL.Add('select *');
ADOQuery.SQL.Add('from ''LDAP://' + _varDSRoot + '''');
ADOQuery.SQL.Add('where objectClass = ''user''');
ADOQuery.SQL.Add('and CN = ''' + ComboBox.Text + ''''); |
... et je stocke le résultat dans une variable Usr de type IADsUser de l'unité ActiveDs_TLB.
1 2
|
Usr := GetObject(ADOQuery.FieldValues['AdsPath'])as IADsUser; |
Ensuite, j'ajoute les informations dont j'ai besoin dans une ListBox.
Par exemple :
ListBox.Items.Add('FullName : ' + Usr.TelephoneNumber);
Cette ligne ne fonctionne que si un numéro de téléphone à été renseigné dans le LDAP. Sinon, l'exe se ferme brutalement, sans message d'erreur.
Je ne peut pas faire de pas-à-pas dans Delphi, car il m'affiche la fenêtre de débug à chaque instruction, comme si rien ne fonctionnait, alors que ça n'empêche pas l'application de récupérer des info du LDAP.
Comment contourner le problème, ou tester d'une manière ou d'une autre si l'information que je souhaite récupérer à été renseignée dans la LDAP ?
Partager