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
-
Google url shortener service, goo.gl , is now much improved with newly included features like easier copy and paste, and ability to delete e...
-
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 ...
-
Get accurate and real-time bus arrival information for public bus operators in Singapore, including SBS Transit, SMRT Buses, Go-Ahead Singap...
-
*********** 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 one additional station on the North East Line (...
No comments:
Post a Comment
Do provide your constructive comment. I appreciate that.