手搓分享一个随心换壁纸脚本

忧心的启

整天对着系统一个背景图，感觉有点闷心了。调试了一个随机切换壁纸的脚本，添加到右键菜单，随时可换一换壁纸，就当换换心情。
脚本支持双系统环境PE_PC端。绿色脚本，支持任意路径文件夹。两个脚本须同目录。支持四种图片格式，图片命名随意。指定图片路径是%SystemRoot%\Web\Wallpaper\Windows也就是系统盘windows文件夹的web文件夹……，这个也可以自定修改。文件夹内图片至少两张，否则脚本不生效果if !num! lss 2 exit。
两个源脚本打包： 随心换壁纸.7z (848 Bytes, 下载次数: 18)

昨天 15:38 上传

点击文件名下载附件

双击加载右键菜单bat

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. set "SJ=%~dp0SJBZ.bat"
   
4. set "TmpReg=menu.reg"
   
5. echo Windows Registry Editor Version 5.00 >!TmpReg!
   
6. echo.>>!TmpReg!
   
7. echo [HKEY_CLASSES_ROOT\DesktopBackground\Shell\SwitchTheme]>>!TmpReg!
   
8. echo @="随心换壁纸">>!TmpReg!
   
9. echo "Icon"="shell32.dll,176">>!TmpReg!
   
10. echo "Position"="Bottom">>!TmpReg!
    
11. echo.>>!TmpReg!
    
12. echo [HKEY_CLASSES_ROOT\DesktopBackground\Shell\SwitchTheme\command]>>!TmpReg!
    
13. echo @="cmd /c \"!SJ:\=\\!\"">>!TmpReg!
    
14. reg import !TmpReg!
    
15. del /f /q !TmpReg!
    
16. exit

复制代码

右键调用的SJBZ.bat

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. set "WALL_DIR=%SystemRoot%\Web\Wallpaper\Windows"
   
4. set num=0
   
5. for %%i in ("%WALL_DIR%\*.jpg" "%WALL_DIR%\*.jpeg" "%WALL_DIR%\*.png" "%WALL_DIR%\*.bmp") do (
   
6.     set /a num+=1
   
7.     set "pic[!num!]=%%i"
   
8. )
   
9. if !num! lss 2 exit
   
10. set /a rnd=!random!%%(!num!-1)+2
    
11. reg add "HKCU\Control Panel\Desktop" /v Wallpaper /t REG_SZ /d "!pic[%rnd%]!" /f >nul
    
12. reg add "HKCU\Control Panel\Desktop" /v TileWallpaper /t REG_SZ /d "0" /f >nul
    
13. reg add "HKCU\Control Panel\Desktop" /v WallpaperStyle /t REG_SZ /d "10" /f >nul
    
14. if /i "%systemdrive%"=="X:" (
    
15.     PECMD KILL EXPLORER.EXE
    
16. ) else (
    
17. taskkill /f /im explorer.exe & start explorer
    
18. )
    
19. exit

复制代码

可以挂载固化到PE，挂载项是software大项，我挂载时命名是PE10，保存为随心换壁纸挂载.reg

1. Windows Registry Editor Version 5.00
   
2. 
   
3. [HKEY_LOCAL_MACHINE\PE10\Classes\DesktopBackground\Shell\SwitchTheme]
   
4. @="随心换壁纸"
   
5. "Icon"="%SystemRoot%\\System32\\shell32.dll,176"
   
6. "Position"="Bottom"
   
7. 
   
8. [HKEY_LOCAL_MACHINE\PE10\Classes\DesktopBackground\Shell\SwitchTheme\command]
   
9. @="SJBZ.bat"

复制代码

调用的SJBZ.bat直接放到系统system32根目录，省了变量。

忧心的启

自坐首席。学到了，分页好好玩，估计能坑不少人——下一页有成品和图展（还是说一下为好）

it323

换一下壁纸换一下心情，感谢分享！

a66

A 搓？

左岸麦田

好久没换壁纸了

2012102

同感,好久没换壁纸了。

cuicongyuan

谢谢老大手搓分享！

唐峰

挺不错的

holley2008

自娱自乐专用

yanlq632

换一下壁纸换一下心情，感谢分享！

yanlq632

换一下壁纸换一下心情，感谢分享！

zaq11111

感谢分享

in9

支持原创，谢谢分享！

ZMLoveLH

我也想随心换电脑壁纸啊，这个脚本正合用