Bonjour à tous,

Je souhaite créer un .vbs qui fera en sorte que pour tout les utilisateurs de mon domaine AD, la case "l'utilisateur ne peut pas changer de mot de passe" soit décocher.

Je suis capable de le faire pour un utilisateur particulier mais pas pour tout le domaine.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Const ADS_UF_PASSWD_CANT_CHANGE = &H0040
 
Set objUser = GetObject("WinNT://mondomaine/mon user")
 
If objUser.UserFlags AND ADS_UF_PASSWD_CANT_CHANGE Then
    objPasswordNoChangeFlag = objUser.UserFlags XOR ADS_UF_PASSWD_CANT_CHANGE
    objUser.Put "userFlags", objPasswordNoChangeFlag 
    objUser.SetInfo
End If
si quelqu'un a la solution. Merci d'avance