Usuário com melhor resposta
Desativar / Reativar conta local

Pergunta
-
Ba Galera
Na paz
Galera como posso fazer via vbs para desativar uma conta local quando o mesmo for executado e um outro vbs que quando executado, ele reative a conta local, por exemplo em todas as maquinas aqui da empresa tem uma conta chamada remoto nas estaçoes, o que quero e um script que desabilite a conta e um outro que reabilite..
Abraço galera...
Respostas
-
Olá,
Fiz os testes aqui... acho que eu tava com sono rsrsrs...
Segue abaixo:
Para desabilitar
strUsuario = "remoto"
strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/" & strUsuario)
objUser.AccountDisabled = True
objUser.SetInfo
Para habilitar
strUsuario = "remoto"
strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/" & strUsuario)
objUser.AccountDisabled = False
objUser.SetInfo
Só uma dúvida, é usuário local mesmo neh???
Até mais,
Jesiel
Obs.: Se útil, calssifique
- Marcado como Resposta Marcelo TI sexta-feira, 31 de julho de 2009 00:13
Todas as Respostas
-
Olá,
Faça os testes nos scripts abaixo:
Para desabilitar:
strUsuario = "remoto"
strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/" & remoto & "")
objUser.AccountDisabled = True
objUser.SetInfo
Para habilitar:
strUsuario = "remoto"
strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/" & remoto & "")
objUser.AccountDisabled = False
objUser.SetInfo
Faça os testes e nos retorne.
Até mais,
Jesiel
Obs.: Se útil, classifique
- Marcado como Resposta Marcelo TI quarta-feira, 29 de julho de 2009 23:04
- Não Marcado como Resposta Marcelo TI quarta-feira, 29 de julho de 2009 23:43
-
-
Olá,
Fiz os testes aqui... acho que eu tava com sono rsrsrs...
Segue abaixo:
Para desabilitar
strUsuario = "remoto"
strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/" & strUsuario)
objUser.AccountDisabled = True
objUser.SetInfo
Para habilitar
strUsuario = "remoto"
strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/" & strUsuario)
objUser.AccountDisabled = False
objUser.SetInfo
Só uma dúvida, é usuário local mesmo neh???
Até mais,
Jesiel
Obs.: Se útil, calssifique
- Marcado como Resposta Marcelo TI sexta-feira, 31 de julho de 2009 00:13
-
Ba Jesiel
Boa noite..
Heheh cara quando começei a ler, coloquei a mao na cabeça e puxa... sera que eu tava dormindo hehehe ai continuei a ler e vi e compreendi.
hehe ba cara vc vai uma vez me ajudou um grande abraço..
rolou legal, e é local mesmo.