Script para alterar senha do Administrator Local

Dica do meu amigo gordinho Erick Albuerque

Pessoal, vejo que é uma grande necessidade dos profissionais de TI em redefinir a senha do Administrador local para um range de IP, com o script abaixo isto é possivel, basta definir o range e a senha! Salve o codigo abaixo com a extesão .vbs e sucesso! Lembre-se, se o Windows for em português é necessário mudar o nome do usuário!

———– CORTE AQUI

Dim i

for i= 1 to 254

strComputer = “10.0.0.” & i ‘Define seu range de IP ou hostname
Set colAccounts = GetObject(“WinNT://” & strComputer & “,computer”)
Set objUser = GetObject(“WinNT://” & strComputer & “/Administrator, user”) ‘Se caso o Windows for em pt-BR altere para Administrador
objUser.SetPassword “teste” ‘Defina a senha nesta linha
objUser.SetInfo
next

———– CORTE AQUI

[]s

Anúncios

Deixe um comentário

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