CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

Recuperer mdp admin local

Cyberhakim
Cyberhakim
Niveau 10
03 novembre 2009 à 10:51:48

Bonjour, voilà je souhaite recuperer les mot de passe administrateur locale sur des machines distante via un reseau; Pour cela j'ai créer un .vbs avec le script qui suit:

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"

Le script s'execute bien mais ne change pas le mot de passe, j'ai rentré le nom netbiios de la machine distante et ensuite j'ai essayé qu'avec l'adresse IP mais rien n'y fait. Avez vous une solution svp, je possede le nom et le mot de passe du compte administrateur reseau.

Merci

Cyberhakim
Cyberhakim
Niveau 10
03 novembre 2009 à 11:24:29

Personne n'a une solution? Je dois effectuer ce TP aujourd'hui dans le cadre d'une formation donc si vous avez des idées.

Cyberhakim
Cyberhakim
Niveau 10
04 novembre 2009 à 09:09:44

:up:

Sous forums
  • Aide à l'achat Mac
  • Création de sites web
  • Création de Jeux
  • Linux
  • Programmation
  • Internet
  • Steam Deck
  • Macintosh
  • Hardware
La vidéo du moment