Skript zum Ändern des Desktophintergrunds

Positiver Arbeitstag

Bildnachweis: Brusonja/iStock/Getty Images

Die meisten Benutzer wissen es nicht, aber Microsoft installiert eine Kopie ihrer Visual Basic Script-Sprache auf jedem Windows-Computer. Diese einfache, aber leistungsstarke Sprache ermöglicht es, fast jede Aufgabe zu automatisieren, die ein Benutzer oder Administrator auf einem System ausführen muss, wie beispielsweise das Ändern des Desktop-Hintergrunds.

Texteditor

Das Erstellen eines Visual Basic-Skripts ist einfach: Sie benötigen lediglich einen einfachen Texteditor wie Windows Notepad. Anstatt die Datei jedoch mit einem Namen zu speichern, der auf ".TXT" endet, muss die Datei mit einem Namen gespeichert werden, der auf ".VBS" endet.

Video des Tages

Das Skript

Fügen Sie Folgendes in einen Texteditor ein:

dim shell dim benutzer

Shell setzen = WScript. CreateObject("WScript. Shell") user = Shell. ExpandEnvironmentStrings("%USERNAME%")

Set fso = CreateObject("Scripting. FileSystemObject")

windowsDir = fso. GetSpecialFolder (0) wallpaper = "c:\wallpaper.jpg"

Hülse. RegWrite "HKCU\Systemsteuerung\Desktop\Wallpaper", Hintergrundbild

Hülse. Führen Sie "%windowsDir%\System32\RUNDLL32.EXE user32.dll, UpdatePerUserSystemParameters", 1, True. aus

Ändern Sie die Datei "c:\wallpaper.jpg" in den Pfad und Dateinamen des Desktop-Hintergrunds, den Sie verwenden möchten.

Wie man läuft

Um das Skript auszuführen, speichern Sie es einfach mit der Dateierweiterung .VBS. Doppelklicken Sie dann mit der Maus auf das entsprechende Symbol auf Ihrem Desktop, als würden Sie jedes andere Programm starten.