[..] Interroger Base Lotus Domino

RPIMA · #1

Bonjour,

J'essaye de me connecter à mon serveur Lotus Notes et récupérer les informations sur des utilisateurs voici ce que j'ai fais pour le moment :

Code : Tout sélectionner

func _connexionLDAPLotus()
    

$vSearch = "(cn=TEST)"
$objConn = ObjCreate("ADODB.Connection")
$objConn.Provider= "ADsDSOObject"
$objConn.Open ("ADs Provider", "ADMIN","PASS")


 $objRst = $objConn.Execute("<LDAP://domino/o=ia/ou=ich>;" & $vSearch & ";cn,mail,uid")


While not $objRst.EOF

      msgbox(0,"",$objRst.Fields("mail").Value)
      msgbox(0,"",$objRst.Fields("cn").Value)
      msgbox(0,"",$objRst.Fields("uid").Value)
      $objRst.MoveNext
Wend
$objConn.Close
    
EndFunc

A priori je me connectes bien , je fais de bonne recherche(je mets de mauvais mot de passe par exemple et j'ai erreur, avec le bon ca passes, quand je mets une mauvais recherche pareil j'ai une erreur), mais les msgbox ne renvoi absolument rien. J'ai bien un recordset mais aucune valeur.

Auriez vous une idée?

Merci d'avance