Changer une mot de passe administrateur d'une machine distante sur un domaine

Contenu du snippet

c'est un petit Script on Vb me permet de modifier le mot de passe administrateur local, d'une machine distante

Source / Exemple :


dim net
strcomputer = inputbox("Nom de la machine a modifier le nom","Changer Mot de pass Administrateur Local","")
admin = inputbox ("Nom de l'administrateur Reseau","Changer Mot de pass Administrateur Local","")
pass = inputbox("Mot de pass administrateur Reseau","Changer Mot de pass Administrateur Local","")
npass = inputbox("Nouvelle mot de pass","Changer Mot de pass Administrateur Local","")
Set net = CreateObject("WScript.Network") 

Set dso = GetObject("WinNT:")
Set oUser = dso.OpenDSObject("WinNT://" & strComputer & "/Administrateur, user", admin , pass , 1)

oUser.SetPassword npass
oUser.SetInfo
wscript.echo " Terminer"

Conclusion :


pour d'autre information merci de me contacter peut être qu'on peut trouver d'autre solution a nos problème;
Merci infiniment a Codes Sources pour sont aide inestimable.

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.