Lokales Administratorpasswort setzen
Aus Sicherheitsüberlegungen sollte sich das Passwort des
lokalen
Administrators an den Clients von dem des Domänenadministrator
unterscheiden. Auch sollte man beide von Zeit zu Zeit ändern.
Mit diesem Startskript können Sie zentral das lokale
Administratorpasswort an jeder Arbeitsstation ändern.
- Erstellen Sie auf dem Server in der Freigabe "netlogon" einen
Ordner "LocalUser".
Entpacken Sie nach dort die Datei "LocalUser.vbs"
hinein.
- Öffnen Sie die Datei LocalUser.vbs und
ändern Sie dort in der Zeile
ChangePasswort "Administrator", "service03"
das Passwort (hier: service03) auf ein sicheres Passwort
Ihrer Wahl.
- Da in der LocalUser.vbs das Administratorpasswort
in
Klartext abgelegt ist, müssen Sie die Berechtigungen
des
Ordners LocalUser wie folgt anpassen:
Administratoren u. System: Vollzugriff
Domänencomputer: Lesen u.
Ausführen
keine weiteren Einträge.
- Weisen Sie das Startskript zu, wie in der Anleitung zu Ihrem
Betriebsystem beschrieben.
- Beim nächsten Hochfahren wird das Passwort
geändert.
VisualBasicSkript [zip] [4
KB]
Skripttext:
'-------------------------------------------------------
' LocalUser-Tool
' Autor: Adrian Koch
' Version: 1.0
' Datum: 26.10.2003
'-------------------------------------------------------
ChangePasswort "Administrator",
"service03"
Sub ChangePasswort(Username, Passwort)
Set WshNet =
CreateObject("WScript.Network")
ComputerName = WshNet.ComputerName
Set computer = GetObject("WinNT://"
& ComputerName)
Set konto =
computer.GetObject("User", Username)
konto.SetPassword Passwort
konto.SetInfo
End Sub