I have scripted Wallpaper.vbs to allow you to switch your wallpaper with a script.
The syntax for using Wallpaper.vbs is:
CSCRIPT //NOLOGO C:\Folder\Wallpaper.vbs "C:\Windows\Wallpaper.bmp"
Where C:\Folder\Wallpaper.vbs is the full qualified path to the Wallpaper.vbs script, and "C:\Windows\Wallpaper.bmp" is the fully qualified path to the wallpaper file.
Wallpaper.vbs contains:
Dim WshShell, oArgs Set WshShell = WScript.CreateObject("Wscript.Shell") set oArgs=wscript.arguments If oArgs.Count > 0 Then WshShell.RegWrite "HKCU\Control Panel\Desktop\Wallpaper"," WshShell.Run "%windir%\System32\RUNDLL32.EXE user32.dll, UpdatePerUserSystemParameters", 1, False Else Wscript.Echo "Syntax: CSCRIPT //NOLOGO C:\UTIL\Wallpaper.vbs ""C:\Windows\Wallpaper.bmp""" End If Set WshShell = Nothing" & oArgs(0) &
0 comments
Hide comments