ok

merci HB

Ca m'a bien servi

"moi" a écrit :

> Notre ami olivier tapota :
>
> > Bonjour,
> >
> >
> > Comment changer un mot de passe du compte administrateur local de
> > chaque poste de travail via un script ou via une GPO ?
> >
> > Environnement Active Directory 2003 - PC Windows Xp Sp2
> >
>
> Bonjour,
>
> Avec un script de démarrage ou d'extinction
> déclaré par GPO (machine)
>
> en vbs :
> ' ===============================
> Pwd = "ZeSuperMotDePasse"
> AdminLoc = "Administrateur"
> ' -----------------------------------------
> Set NET = Wscript.CreateObject("WScript.Network")
> Machine = NET.ComputerName
> Requ = "WinNT://" & Machine & "/" & AdminLoc & ",User"
> Set ObjAdminLoc = GetObject(Requ)
> If Err.Number<>0 Then
> ' erreur : l'utilisateur n'existe pas ...
> Else
> ObjAdminLoc.SetPassword Pwd
> End If
> ' ===============================
>
> A+
>
> HB
>
>