[VBS] Modifier nom complet Active Directory
Yv@n
-
l'etudiant -
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é:
Merci d'avance de votre aide
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
