Script untuk Mengubah Latar Belakang Desktop

Hari yang positif di tempat kerja

Kredit Gambar: Brusonja/iStock/Getty Images

Sebagian besar pengguna tidak menyadarinya, tetapi Microsoft menginstal salinan bahasa Visual Basic Script mereka di setiap komputer Windows. Bahasa yang sederhana namun kuat ini memungkinkan untuk mengotomatisasi hampir setiap tugas yang perlu dilakukan pengguna atau administrator pada suatu sistem, seperti mengubah latar belakang desktop.

Editor Teks

Membuat Script Visual Basic itu mudah: yang Anda butuhkan hanyalah editor teks sederhana seperti Windows Notepad. Namun, alih-alih menyimpan file dengan nama yang diakhiri dengan ".TXT", file tersebut harus disimpan dengan nama yang diakhiri dengan ".VBS."

Video Hari Ini

Naskah

Rekatkan yang berikut ini ke editor teks:

shell redup pengguna redup

Setel shell = WScript. CreateObject("WScript. Shell") pengguna = cangkang. PerluasEnvironmentStrings("%USERNAME%")

Setel fso = CreateObject("Scripting. FileSystemObject")

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

kerang. RegWrite "HKCU\Control Panel\Desktop\Wallpaper", wallpaper

kerang. Jalankan "%windowsDir%\System32\RUNDLL32.EXE user32.dll, UpdatePerUserSystemParameters", 1, Benar

Ubah file "c:\wallpaper.jpg" ke jalur dan nama file dari latar belakang desktop yang ingin Anda gunakan.

Cara Menjalankan

Untuk menjalankan skrip, cukup simpan dengan ekstensi file .VBS. Kemudian, klik dua kali ikonnya di Desktop Anda dengan mouse seperti yang Anda lakukan untuk memulai program lain.