el ## define constantes
$domainstr = “, dc=starking, dc=org”
$domainnb = nombre “starking ” de netbios del dominio del ##
$domain = “starking.org”
$ADs_UF_NORMAL_ACCOUNT = el ## 512 permite cuenta y fija contraseña requerida
el ## consigue el passsword del defecto - cifrado no almacenado tan en escritura
$defaultPassword = el Leer-Anfitrión “incorporan por favor contraseña de defecto” - asSecureString
el ## consigue la lista de usuarios del archivo de CSV
## si necesidad que otras características de usuario pueden agregar a CSV
el ## podía apresurar el proceso por la lista de usuario del sortng del OU sino necesitar código
## para manejar el cambio del OU. Esto es más simple como ejemplo
Importar-csv users.txt | foreach {
el ## crea nombre de usuario
$strusr = $_.Last + ““+ $_.First
$strusr
$ldapstr = “LDAP: //OU=” + $_.OU + $domainstr
$target = [ADSI] $ldapstr
$newuser = $target.create (“usuario”, “cn=” + $strusr)
$newuser.SetInfo ()
$userid = $_.first [0] +$_.first [1] +$_.last
si ($userid.length - GT 20) {$userid = $userid.substring (0.20)}
$newuser.samaccountname = $userid.ToString ()
$newuser.givenName = $_.first
$newuser.sn = $_.last
$newuser.displayName = $_.last + ““+ $_.first
$newuser.userPrincipalName = $_.first [0] +$_.first [1] +$_.last + “@” + $domain
$newuser.SetInfo ()
$newuser.SetPassword ($defaultPassword.ToString ())
usuario normal del ## que requiere contraseña y se permite
$newuser.userAccountControl = $ADs_UF_NORMAL_ACCOUNT
$newuser.SetInfo ()
# fijar a usuario debe cambiar contraseña en la bandera siguiente de la conexión
$newuser.pwdLastSet = 0
$newuser.SetInfo ()
el ## ahora fijó el país
$newuser.c = $_.Country
$newuser.SetInfo ()
El Escribir-Anfitrión “creado explica: ” $newuser. Displayname
}
|