Aqui van una lista de ejemplo de gestion de usuarios de VBScript
Creacion de un Usuario, Grupo y Unidad Organizativa:
Set objDomain = GetObject(«LDAP://dc=fabrikam,dc=com»)
Set objOU = objDomain.Create(«organizationalUnit», «ou=Management»)
objOU.SetInfoSet objOU = GetObject(«LDAP://OU=Management,dc=fabrikam,dc=com»)
Set objUser = objOU.Create(«User», «cn= AckermanPilar»)
objUser.Put «sAMAccountName», «AckermanPila»
objUser.SetInfo
Set objOU = GetObject(«LDAP://OU=Management,dc=fabrikam,dc=com»)
Set objGroup = objOU.Create(«Group», «cn=atl-users»)
objGroup.Put «sAMAccountName», «atl-users»
objGroup.SetInfo
objGroup.Add objUser.ADSPath
Habilitar una cuenta de usuario
Set objUser = GetObject _
(«LDAP://cn=myerken,ou=management,dc=fabrikam,dc=com»)
objUser.AccountDisabled = FALSE
objUser.SetInfo
Mover una cuenta de usuario
Set objOU = GetObject(«LDAP://ou=sales,dc=na,dc=fabrikam,dc=com»)
objOU.MoveHere _
«LDAP://cn=BarrAdam,OU=hr,dc=na,dc=fabrikam,dc=com», vbNullString
Requerir cambio de contraseña
Set objUser = GetObject _
(«LDAP://CN=myerken,OU=management,DC=Fabrikam,DC=com»)
objUser.Put «pwdLastSet», 0
objUser.SetInf0
Estos son solo algunos ejemplos, os dejo el link a una pagian con un monton de ejemplos de configuracion de usuarios con VBScritpt. Link