[active directory] création d'une unité organisationnelle + ajout d'un utilisateur

Commenter

Contenu du snippet

Ce script crée une unité organisationnelle et y place un utilisateur.
Il modifie ensuite son mot de passe et désactive le compte.

Source / Exemple : 


Set objRoot = GetObject("LDAP://rootDSE")
Set objDomain = GetObject("LDAP://" & objRoot.Get("defaultNamingContext"))
Set myOU=objDomain.Create("organizationalUnit", "ou=LaboMicrosoft")
myOU.Put "Description", "OU crée par Laboratoire Microsoft" 
myOU.SetInfo
Set myUser = myOU.Create("User", "cn=Loic Thobois")
myUser.Put "sAMAccountName", "lthobois"
myUser.Put "Description", "Utilisateur Loic Thobois"
myUser.SetInfo
myUser.SetPassword "superpassword123@"
myUser.AccountDisabled = True
myUser.SetInfo

Conclusion :


ligne 2: Remplacer "defaultNamingContext" par le nom de votre domaine.
ligne 3: Remplacer LaboMicrosoft par votre unité organisationnelle.
ligne 4: Remplacer "OU crée par Laboratoire Microsoft" par la description de votre unité organisationnelle.
ligne 6: Remplacer Loic Thobois par le nom de l'utilisateur a ajouter.
ligne 7: remplacer "lthobois" par le loggin de l'utilisateur à créer.
ligne 8: Remplacer "Utilisateur Loic Thobois" par la description de l'utilisateur.
ligne 10: Remplacer "superpassword123@" par le mot de passe initiale de l'utilisateur.
ligne 11: Remplacer True par False pour activer le compte utilisateur lors de sa création.

A voir également

Du même auteur (cs_FrancB)