Skript na zmenu pozadia pracovnej plochy

Pozitívny deň v práci

Kredit za obrázok: Brusonja/iStock/Getty Images

Väčšina používateľov si to neuvedomuje, ale spoločnosť Microsoft nainštaluje kópiu ich jazyka Visual Basic Script na každý počítač so systémom Windows. Tento jednoduchý, ale výkonný jazyk umožňuje automatizovať takmer každú úlohu, ktorú musí používateľ alebo správca vykonať v systéme, ako je napríklad zmena pozadia pracovnej plochy.

Textový editor

Vytvorenie skriptu Visual Basic je jednoduché: všetko, čo potrebujete, je jednoduchý textový editor, akým je napríklad Windows Poznámkový blok. Namiesto uloženia súboru s názvom, ktorý končí príponou „.TXT“, však musí byť súbor uložený s názvom končiacim príponou „.VBS“.

Video dňa

Scenár

Do textového editora vložte nasledovné:

dim shell dim user

Nastavte shell = WScript. CreateObject("WScript. Shell") užívateľ = shell. ExpandEnvironmentStrings("%USERNAME%")

Set fso = CreateObject("Skriptovanie. FileSystemObject")

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

škrupina. RegWrite "HKCU\Ovládací panel\Pracovná plocha\Tapeta", tapeta

škrupina. Spustite "%windowsDir%\System32\RUNDLL32.EXE user32.dll, UpdatePerUserSystemParameters", 1, True

Zmeňte súbor "c:\wallpaper.jpg" na cestu a názov pozadia pracovnej plochy, ktoré chcete použiť.

Ako behať

Ak chcete skript spustiť, jednoducho ho uložte s príponou súboru .VBS. Potom dvakrát kliknite myšou na jeho ikonu na pracovnej ploche, ako by ste spustili akýkoľvek iný program.