Cambio contraseña Administrador por politicas

12/05/2005 - 13:23 por Esther | Informe spam
Hola a todos,
alguien sabe si es posible cambiar el password de Administrador local de x
maquinas mediante politicas (adm)??

Muchas gracias
 

Leer las respuestas

#1 Rodolfo Parrado Gutiérrez [MVP Windows]
12/05/2005 - 18:05 | Informe spam
defina una politica de inicio de sistema (no de usuario) y que tengan permisos de lectura los domain comouters y no los domain users y pone en la primera linea el password que quiere...
cada vez que la maquina prenda cambiara el password de administrador local (adicionalmnete restrinja grupos y renombre la cuenta de administrador para estandarizar a todo el mundo con la misma)

note que el scrip cambia el password sin importar como se llame la cuenta de adminisrador local...

Cambiar password de administrador local estaciones scrip de inicio de maquinas..


sNewPassword = "testpassword"
Set oWshNet = CreateObject("WScript.Network")
sComputer = oWshNet.ComputerName
sAdminName = GetAdministratorName
On Error Resume Next
Set oUser = GetObject("WinNT://" & sComputer & "/" & sAdminName & ",user")
oUser.SetPassword sNewPassword
oUser.SetInfo
On Error Goto 0

Function GetAdministratorName()
Dim sUserSID, oWshNetwork, oUserAccount
Set oWshNetwork = CreateObject("WScript.Network")
Set oUserAccounts = GetObject( _
"winmgmts://" & oWshNetwork.ComputerName & "/root/cimv2") _
.ExecQuery("Select Name, SID from Win32_UserAccount" _
& " WHERE Domain = '" & oWshNetwork.ComputerName & "'")
On Error Resume Next
For Each oUserAccount In oUserAccounts
If Left(oUserAccount.SID, 9) = "S-1-5-21-" And _
Right(oUserAccount.SID, 4) = "-500" Then
GetAdministratorName = oUserAccount.Name
Exit For
End if
Next
End Function






-
Rodolfo Parrado Gutiérrez
http://tinyurl.com/6bvzu
Bogotá - Colombia
-
MVP Windows Server
MCT, MCSE, MCSA, MCDST, MCP+I
-
Este mensaje se proporciona "como está" sin garantías de ninguna índole, y no otorga ningún derecho.
-
Asegúrese de buscar desde el enlace sobre lo que esta preguntando, ya que muchas veces la pregunta ya fue respondida más de una vez
http://groups.google.com/groups?hl=....public.es
-

"Esther" escribió en el mensaje news:
Hola a todos,
alguien sabe si es posible cambiar el password de Administrador local de x
maquinas mediante politicas (adm)??

Muchas gracias

Preguntas similares