Skrypt do zmiany tła pulpitu

click fraud protection
Pozytywny dzień w pracy

Źródło obrazu: Brusonja/iStock/Getty Images

Większość użytkowników nie zdaje sobie z tego sprawy, ale Microsoft instaluje kopię ich języka Visual Basic Script na każdym komputerze z systemem Windows. Ten prosty, ale potężny język umożliwia zautomatyzowanie prawie każdego zadania, które użytkownik lub administrator będzie musiał wykonać w systemie, na przykład zmiana tła pulpitu.

Edytor tekstu

Tworzenie skryptu Visual Basic jest łatwe: wystarczy prosty edytor tekstu, taki jak Notatnik Windows. Jednak zamiast zapisywać plik pod nazwą kończącą się na „.TXT”, plik należy zapisać pod nazwą kończącą się na „.VBS”.

Wideo dnia

Scenariusz

Wklej następujące elementy do edytora tekstu:

dim shell dim user

Ustaw powłokę = WScript. CreateObject("WScript. Powłoka") użytkownik = powłoka. ExpandEnvironmentStrings("%USERNAME%")

Ustaw fso = CreateObject("Skrypty. Obiekt systemu plików")

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

powłoka. RegWrite "HKCU\Control Panel\Desktop\Wallpaper", tapeta

powłoka. Uruchom "%windowsDir%\System32\RUNDLL32.EXE user32.dll, UpdatePerUserSystemParameters", 1, True

Zmień plik „c:\wallpaper.jpg” na ścieżkę i nazwę pliku tła pulpitu, którego chcesz użyć.

Jak biegać

Aby uruchomić skrypt, po prostu zapisz go z rozszerzeniem .VBS. Następnie kliknij dwukrotnie jego ikonę na pulpicie za pomocą myszy, tak jak uruchamiasz dowolny inny program.