设置某个图片为桌面壁纸的快捷命令有吗

j2rong

设置某个图片为桌面壁纸的快捷命令有吗

szwp

pecmd wall

fjun67

这又不麻烦

ice147bing

我都是直接点右键

hoder

'将代码粘贴到记事本,选择ANSI编码,另存为 设置壁纸.vbs
'wallpaper路径改成你自己的图片文件路径
'需要注意的是,有些系统设置壁纸之后,需要注销当前用户或者重启系统才会生效.

Dim wallpaper,WshShell
wallpaper = "C:\Program Files (x86)\wallpaper.jpg"
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKCU\Control Panel\Desktop\Wallpaper", wallpaper, "REG_SZ"
WshShell.Run "%windir%\System32\RUNDLL32.EXE user32.dll, UpdatePerUserSystemParameters", 1, True
Set WshShell = Nothing

youxia1220

谢谢分享

xhxy2021

直接右键

xyz141

用XnView看图软件可直接设置成壁纸

binyue1985

应该是想通过后台执行批处理实现改壁纸的效果吧

忧心的启

晕了啊，你都能看到图片位置了还用命令，不是一个右键解决的事。

j2rong

binyue1985 发表于 2025-2-10 08:42
应该是想通过后台执行批处理实现改壁纸的效果吧

对的

j2rong

忧心的启 发表于 2025-2-10 09:25
晕了啊，你都能看到图片位置了还用命令，不是一个右键解决的事。

应该是想通过后台执行批处理实现改壁纸的效果吧

j2rong

hoder 发表于 2025-2-9 17:52
'将代码粘贴到记事本,选择ANSI编码,另存为 设置壁纸.vbs
'wallpaper路径改成你自己的图片文件路径
'需要 ...

需要什么插件吗.vbs

cena

感谢分享

hycsl888

系统自带的幻灯片你不知道 可以自动更换壁纸 还可以设置时间，顺序随机

Zap

powershell

1. Set-ItemProperty -Path 'HKCU:\Control Panel\Desktop\' -Name WallPaper -Value "C:\path\to\your\image.jpg"
   
2. rundll32.exe user32.dll, UpdatePerUserSystemParameters

复制代码

yzszh64

谢谢各位。