Set oShell = CreateObject("WScript.Shell")
Set oFSO = CreateObject("Scripting.FileSystemObject")
sWallPaper = "C:\wallpaper.bmp"
' update in registry
oShell.RegWrite "HKCU\Control Panel\Desktop\Wallpaper", sWallPaper
' let the system know about the change
oShell.Run "RUNDLL32.EXE user32.dll,UpdatePerUserSystemParameters"
Wednesday, April 01, 2009
How to Change Windows Desktop Wallpaper Programmatically?
The below is a little VBScript code snippet to perform changing of Windows desktop wallpaper programmatically.
Subscribe to:
Post Comments (Atom)
Popular Posts
-
Robocopy, short for "Robust File Copy" is an advanced command-line utility included in Windows. It's designed to copy files an...
-
I would like to apologize that sigining of my guestbook is not possible at the moment due to an unexpected bug. There is already 74 entries ...
-
Installed FortiClient recently but the challenge in disabling the application/service from running automatically on every start-up annoyed m...
-
*********** Try to sleep now, close your eyes Soon the birds would stop singing Twinkling stars, are shining bright They'll be watch...
-
Singapore’s Land Transport Authority has just released an updated official MRT map including seven new stations on the Thomson-East Coast Li...
No comments:
Post a Comment
Do provide your constructive comment. I appreciate that.