[VBS] Connexion à l'Active Directory

Version imprimable

Bonjour,

Je vous explique le pb:
Dans mon entreprise les utilisateur sont crées avec une nomenclature du type : NOM, Prénom
J'ai realisé un script qui parcours une feuille Excel et qui complete les differents champs de l'AD avec les information du fichier Excel

Mon pb se pose au niveau des noms.
Les ligne de commande si dessous on pour effet d'ouvrir l'objet utilisateur.
Code:

1 2 3 4 5 6 7 8 strCN = Trim(objSheet.Cells(intRow, 1).Value) 'on recupere le nom sur le fichier excel (sous la forme : NOM, Prenom) strobjUser= "LDAP://cn="&strCN&",cn=Users,dc=TESTSYLIS,dc=FR" 'on l'integre a l'adresse dans LDAP Set objUser = GetObject(strobjUser) ' et on recupere l'objet utilisateur
Lorsque que l'utilisateur n'a pas de virgule la commande s'execute bien.
Dans le cas contraire ca ne fonctionne pas, la virgule etant mal interpreté dans l'adresse

En fait je cherche à remplacer la virgule par un equivalant qui serait interpretable.

Je me tourne donc vers vous pour un peu d'aide

Merci

10/04/2006, 13h34
ouskel'n'or

Citation:

Envoyé par romain_gil

Lorsque que l'utilisateur n'a pas de virgule la commande s'execute bien.

Qu'entends-tu pas là ? Tu mets "NOM, Prénom" sans virgule et ça fonctionne ? Si c'est ça, remplace la virgule par un autre séparateur au passage

Code:

strCN = Replace(Trim(objSheet.Cells(intRow, 1).Formula),",","_")

Je n'ai pas replace dans VBA97, si mon code pose pb, regarde dans l'aide :wink:

Juste une idée en passant

A+
10/04/2006, 13h37
jmfmarques

Voilà et un point c'est tout, si tu ne veux pas de virgule ! :rire:
10/04/2006, 14h44
romain_gil

Le pb est que les utilisateurs du domaine sont tous nommés comme ca :

DURAND, Jacques
DUPONT, Pierre

Si ils avaient été nommé DUPOND Jacques ca marcherai.

La virgule pose probleme quand j'essaye d'ouvrir l'objet utilisateur.
Car pour faire ca je dois specifier le chemin complet.

Code:

LDAP://cn=DUPONT, Jacques,cn=Users,dc=TESTSYLIS,dc=FR

Le pb c cette virgule qui est mal interpreté.

On ne peut pas la remplacer par un equivalent en caractere speciaux ou autre?
Ou peut etre y a-t-il un format dans les adresses AD qui prenne en compte les virgule.

Merci pour vos reponses et pour votre réactivité
10/04/2006, 14h53
AlainTech

Je n'y connais rien en manipulation d'AD mais cette syntaxe n'aiderait pas:

Code:

LDAP://cn="DUPONT, Jacques",cn=Users,dc=TESTSYLIS,dc=FR

:?: :?: :?:
10/04/2006, 16h44
romain_gil

Le fait de remplacé la virgule par un espace pourrait fonctionner si les users de mon active directory etait nommé sans virgule.

Je ne cherche pas a changer la virgule mais bien a la faire passer dans le script par n'importe kel moyen car quasiment tout les utilisateurs sont crées avec la virgule.

Le script fonctionne pour les utilisateurs qui n'ont pas de virgule dans le nom pour les autres ca plante.

En fait je cherche comment ecrire cette satané virgule pour qu'elle ne soit pas mal interprété
10/04/2006, 16h46
romain_gil

Code:

LDAP://cn="DUPONT, Jacques",cn=Users,dc=TESTSYLIS,dc=FR

Ca fonctionne !!!
Merci