Skripts darbvirsmas fona maiņai

Pozitīva diena darbā

Attēla kredīts: Brusonja/iStock/Getty Images

Lielākā daļa lietotāju to neapzinās, bet Microsoft instalē viņu Visual Basic Script valodas kopiju katrā Windows datorā. Šī vienkāršā, bet jaudīgā valoda ļauj automatizēt gandrīz katru uzdevumu, kas lietotājam vai administratoram būs jāveic sistēmā, piemēram, jāmaina darbvirsmas fons.

Teksta redaktors

Visual Basic skripta izveide ir vienkārša: viss, kas jums nepieciešams, ir vienkāršs teksta redaktors, piemēram, Windows Notepad. Tomēr tā vietā, lai saglabātu failu ar nosaukumu, kas beidzas ar ".TXT", fails ir jāsaglabā ar nosaukumu, kas beidzas ar ".VBS".

Dienas video

Scenārijs

Teksta redaktorā ielīmējiet šo:

dim shell dim user

Iestatīt apvalku = WScript. CreateObject ("WScript. Shell") lietotājs = apvalks. ExpandEnvironmentStrings("%USERNAME%")

Set fso = CreateObject ("Skriptēšana. FileSystemObject")

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

apvalks. RegWrite "HKCU\Control Panel\Desktop\Wallpaper", fonu

apvalks. Palaidiet "%windowsDir%\System32\RUNDLL32.EXE user32.dll, UpdatePerUserSystemParameters", 1, True

Mainiet failu "c:\wallpaper.jpg" uz tā darbvirsmas fona ceļu un faila nosaukumu, kuru vēlaties izmantot.

Kā skriet

Lai palaistu skriptu, vienkārši saglabājiet to ar faila paplašinājumu .VBS. Pēc tam veiciet dubultklikšķi uz tās ikonas uz darbvirsmas ar peli, tāpat kā to darītu, lai palaistu jebkuru citu programmu.