lire les valeurs d'un objet dans LDAP en vbs - VB/VBA/VBS - Programmation
Marsh Posté le 22-05-2005 à 03:46:55
A priori il a l'air de récupérer correctement les données vu qu'il t'affiche même le uid (test) dans le message d'erreur. Mais il faut pas utiliser set si c'est un string: value = adsMyobject.uid devrait fonctionner.
Marsh Posté le 22-06-2005 à 12:07:01
Bonjour j'ai un annuaire LDAP et je voudrai pouvoir en extraire des données en VBA pour les insérer dans une table Access.
Dites moi simplement si c'est réalisable en VBA ? J'ai bien dit VBA...
Marsh Posté le 22-05-2005 à 01:52:40
Bonjour,
Dans un annuaire LDAP j'ai créé quelques objets tel que :
dn: cn=test,dc=domain,dc=com
objectClass: top
objectClass: posixAccount
objectClass: inetOrgPerson
cn: test
sn: test
givenName: test
uid: test
uidNumber: 1000
gidNumber: 1001
homeDirectory: /home/test
userPassword: test
loginShell: /bin/false
Je voudrais écrire un script WSH permetant de récupérer les valeurs de ces objets. Pour commancé j'ai essayé de lire la valeur "uid" de l'objet nommé "test". Pour celà j'ai écrit ceci en m'inspirant de différents scripts trouvés sur le net :
strPath = "LDAP://192.168.1.1/cn=test,dc=domain,dc=com"
strUsername = "cn=admin,dc=domain,dc=com"
strPassword = "pass"
Set adsNamespaceLDAP = GetObject("LDAP:" )
Set adsMyObject = adsNamespaceLDAP.OpenDSObject (strPath, strUsername, strPassword, 0)
set value = adsMyobject.uid
Lorsque j'exécute le script, j'obtient une erreur sur la dernière ligne qui m'indique :
Objet requis:'[string: "test"]'
Quelqu'un saurait-il m'expliquer comment je doit m'y prendre ?
merci d'avance.
---------------
Slasher