[VBS] Modification utilisateur Active Directory
Bonjour,
Je dois créer un script VBS qui change l'adresse du profil itinérant.
J'ai récupéré ce code sur internet :
Code:
1
2
3
4
5
6
7
8
9
10
| Set objUser = GetObject _
("LDAP://CN=pseudo,OU=Utilisateurs,OU=LABO,OU=Unités,DC=sous-domaine,DC=domaine,DC=local")
strCurrentProfilePath = objUser.Get("profilePath")
intStringLen = Len(strCurrentProfilePath)
intStringRemains = intStringLen - 11
strRemains = Mid(strCurrentProfilePath, 12, intStringRemains)
strNewProfilePath = "\\Snoopy\Users\%Username%" & strRemains
objUser.Put "profilePath", strNewProfilePath
objUser.SetInfo |
Je n'ai jamais fait de VBS donc je bidouille.
Voici le message d'erreur que j'ai dans une fenêtre :
Code:
1
2
3
4
5
6
| Scripts : G\profil_itinerant.vbs
Ligne : 4
Caract. : 1
Erreur : La propriété répertoire n'est pas présente dans le cache.
Code : 8000500D
Source : Active Directory |
Le code doit normalement marcher, les paramètres indiqués (CN, DC, OU) sont les bons.
Où est l'erreur ?
Cordialement,
[EDIT]2ème question :
D'après le lien plus haut, il est possible de faire une boucle pour changer l'adresse du profil itinérant de tous les utilisateurs d'un même OU, comment est-ce possible ? Pour parcourir la liste des utilisateurs, on utilise quelle variable ?
