[VBS] Modifier nom complet Active Directory

Fermé
Signaler
-
 l'etudiant -
Bonjour,

Voilà, je cherche un script me permettant de modifier le nom complet d'un compte active directory, c'est à dire le SAMAccountName.
J'ai tenté le script suivant mais ça n'a pas fonctionné:
nameToSearch="TEST"
Set objConnection = CreateObject("ADODB.Connection")
objConnection.Open "Provider = ADsDSOObject;"

Set objCommand = CreateObject("ADODB.Command")
objCommand.ActiveConnection = objConnection

objCommand.CommandText = "<LDAP://dc=abbeville,dc=vss,dc=valeo>;(&(objectClass=user)(samAccountName="&nameToSearch&"));userprincipalName;subtree"

Set objOU = GetObject("LDAP://ou=test,dc=site,dc=lieu,dc=com")

objOU.MoveHere _
 "LDAP://samAccountName=&nameToSearch&,ou=test,dc=site,dc=lieu,dc=com", "samAccountName=TEST2"


Merci d'avance de votre aide

2 réponses

Messages postés
17
Date d'inscription
jeudi 22 février 2007
Statut
Membre
Dernière intervention
28 janvier 2008
4
C'est le champ name et non sAMAccountName qui lui correspond au nom de connexion !
4
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 41989 internautes nous ont dit merci ce mois-ci

Bonjour,
J'aimerai savoir comment executer ce script ? suffit-il de le compiler avec VB (ce dont je doute :p)?

Ce script a bien pour vocation de renomer un nom de domaine active directory ?

Merci pour votre aide.