OVH Cloud OVH Cloud

Reset de mot de passe

1 réponse
Avatar
OlivierT
Bonjour,

Voila, je souhaite faire un script qui permet de changer le mot de passe
d'un compte utilisateur. Pour cela, j'ai fais le script suivant qui demande
en entree un fichier avec les logins :

Set Shell = wscript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile =
objFSO.OpenTextFile("c:\userdata\desktop\Reset_mdp\Logins.txt", 1)
Do Until objFile.AtEndOfStream
strLine = Trim (objFile.ReadLine)
' Wscript.Echo strLine
Shell.Run "dsmod user CN=" & strLine & ",OU=Utilisateurs,DC=toto -pwd
azerty05 -mustchpwd no"
Loop
objFile.Close

Le problème est que le script ne me dit pas si une réinitialisation s'est
mal passé.
Comment puis-je avoir un retour pour savoir si le mot de passe a bien ete
change ?

Merci par avance,

Olivier

1 réponse

Avatar
Stéphane [MS]
Bonjour,

Peut-être que se serait plus facile d'obtenir le résultat du script suivant
:
Set objUser = GetObject _
("LDAP://cn=OlivierT,ou=Utilisateurs,dc=toto,dc=com")
objUser.SetPassword "azerty05"

Avec un traitement de type "On Error Resume Next" et "If err >0"

Cdlt
Stéphane

"OlivierT" a écrit dans le message de
news:
Bonjour,

Voila, je souhaite faire un script qui permet de changer le mot de passe
d'un compte utilisateur. Pour cela, j'ai fais le script suivant qui
demande
en entree un fichier avec les logins :

Set Shell = wscript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile > objFSO.OpenTextFile("c:userdatadesktopReset_mdpLogins.txt", 1)
Do Until objFile.AtEndOfStream
strLine = Trim (objFile.ReadLine)
' Wscript.Echo strLine
Shell.Run "dsmod user CN=" & strLine & ",OU=Utilisateurs,DC=toto -pwd
azerty05 -mustchpwd no"
Loop
objFile.Close

Le problème est que le script ne me dit pas si une réinitialisation s'est
mal passé.
Comment puis-je avoir un retour pour savoir si le mot de passe a bien ete
change ?

Merci par avance,

Olivier