Forum

local admin passwor...
 
Bildirimler
Hepsini Temizle

local admin password

2 Yazılar
2 Üyeler
0 Reactions
564 Görüntüleme
(@mehmetokkas)
Gönderiler: 13
Eminent Member
Konu başlatıcı
 

mevcut sistemimde 200 client var bunlarn local admin passwordlarını değiştirmek istiyorum


 active directory üzerinden tüm bilgisayarların admin şifrelerini değiştirme imkanım varmı varsa nasıl olur.

 
Gönderildi : 01/03/2010 16:37

(@murataydin)
Gönderiler: 1514
Noble Member
 

Merhaba;

Aşağıdaki scripti .vbs olarak kaydedip GPO'da start up a koyarsan istediğin olur

 

Set oShell = CreateObject("WScript.Shell")
Const SUCCESS = 0

sUser = "administrator"
sPwd = "Password2"

' get the local computername with WScript.Network,
' or set sComputerName to a remote computer
Set oWshNet = CreateObject("WScript.Network")
sComputerName = oWshNet.ComputerName

Set oUser = GetObject("WinNT://" & sComputerName & "/" & sUser)

' Set the password
oUser.SetPassword sPwd
oUser.Setinfo

oShell.LogEvent SUCCESS, "Local Administrator password was changed!"

 

 
Gönderildi : 01/03/2010 16:54

Paylaş: