Local Admin Şifresini Değiştirmek (Script)
strComputer = "."
Set objUser = GetObject("WinNT://" & strComputer & "/Administrator, user")
objUser.SetPassword "NewPassword"
objUser.SetInfo
NewPassword yazan yere yeni şifreyi yazıyoruz. Dosya uzantısını VBS yapıp yapıp çalıştırıyoruz.
Birden fazla bilgisayarda bu işlemi yapmak için GPO ile domain ortamına uygulayabilirsiniz.
Set objUser = GetObject("WinNT://" & strComputer & "/Administrator, user")
objUser.SetPassword "NewPassword"
objUser.SetInfo
NewPassword yazan yere yeni şifreyi yazıyoruz. Dosya uzantısını VBS yapıp yapıp çalıştırıyoruz.
Birden fazla bilgisayarda bu işlemi yapmak için GPO ile domain ortamına uygulayabilirsiniz.
Yorumlar