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

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

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.