Script para mudar senha de Admin Local

Dica do meu amigo Fabio Souza, alterando a senha do admin local via script:

Pessoal,

segue um script para  mudar a senha de admin local das maquinas,
Coloque o range de ip da sua rede por exemplo:192.168.0 e na variavel for i coloque o intervalo de ip que irá receber a nova senha ex:for i:1 or 254


salve como .vbs e executefor i= 1 to 254

strComputer = “192.168.0.” & i
Set colAccounts = GetObject(“WinNT://” & strComputer & “,computer”)
Set objUser = GetObject(“WinNT://” & strComputer & “/Administrator, user”)
objUser.SetPassword “stf1987@root”
objUser.SetInfo
next

Abraços,
Flavio Honda

Analista de TI,moderador forum TechNet, Microsoft Community Contributor, participante do TechNet Wiki,MCP,MCC,MCSA, MCTS

Publicado em Uncategorized
2 comentários em “Script para mudar senha de Admin Local
  1. rafael disse:

    Uma dúvida na parte que fala strComputer = “192.168.0.” & i
    Ficaria assim “172.16.1.” i= 70 to 250 ? Sem aspas?
    É que pra mim deu erro na GPO quando os pc’s iniciaram.

  2. Hello my family member! I want to say that this post is awesome, nice written and include almost all significant infos.
    I’d like to see extra posts like this .

Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s

%d blogueiros gostam disto: