Description :
Ce script VBS permet de créer 1000 comptes d'utilisateurs (UserNO1, UserNO2, etc..) dans l'OU Users.
Script :
Set objRootDSE = GetObject("LDAP://rootDSE")
Set objContainer = GetObject("LDAP://cn=Users," & _
objRootDSE.Get("defaultNamingContext"))
For i = 1 To 1000
Set objLeaf = objContainer.Create("User", "cn=UserNo" & i)
objLeaf.Put "sAMAccountName", "UserNo" & i
objLeaf.SetInfo
Next
WScript.Echo "1000 Users created."
 Proposer un script
|
Notre avis :
Votre avis :
Réactions :
0
Votants :
12
Visites :
15150
|
