[R] AD : Déverrouiller un compte

[peuchere83]

Bonjour à tous,

je cherche à réaliser un script pour déverrouiller un compte.
Voici un code que j'ai trouvé mais que je n'arrive pas à l'adapter sous autoit :

Code : Tout sélectionner

Set objUser = GetObject ("LDAP://cn=bill,ou=Direction,dc=Microsoft,dc=com")
objUser.IsAccountLocked = False
objUser.SetInfo

J'ai regardé aussi la commande dsmod.exe mais à premiere vue elle ne permet que de réinitialiser le mdp et non pas de déverrouiller le compte:

Code : Tout sélectionner

dsmod user "CN=Bill,CN=Users,DC=Microsoft,DC=Com" -pwd A1b2C3d4

Si quelqu'un a une idée je suis preneur.

Cordialement.

[ani]

je connais pas trop mais je fferais ainsi

Code : Tout sélectionner

Global $objUser = ObjGet("LDAP://cn=bill,ou=Direction,dc=Microsoft,dc=com")
If $objUser.IsAccountLocked = True Then ; ou 1
   $objUser.IsAccountLocked = False ; ou 0
   $objUser.SetInfo ; ou $objUser.SetInfo()
   MsgBox(0,"Information",$objUser.Name & " compte débloqué")
else
   MsgBox(0,"Information",$objUser.SetInfo & " compte non bloqué")
EndIf
 

[peuchere83]

Un grand merci Ani !!!

Je ne pensais pas que c'était si c.. à faire.
J'en suis même limite désolé de t'avoir fait perdre du temps à me répondre.

En tout cas un grand merci.

Bonne journée.