VBS:
----------
set ws=createobject("wscript.shell")
ws.regwrite "HKCU\Control Panel\Desktop\wallpaper","图片路径","REG_SZ"
ws.run "RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters"
----------
BAT:
----------
@echo off
reg add "hkcu\control panel\desktop" /v "wallpaper" /d "图片路径" /f
RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters
----------
set ws=createobject("wscript.shell")
ws.regwrite "HKCU\Control Panel\Desktop\wallpaper","图片路径","REG_SZ"
ws.run "RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters"
----------
BAT:
----------
@echo off
reg add "hkcu\control panel\desktop" /v "wallpaper" /d "图片路径" /f
RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters