求更换桌面壁纸的批处理，自认为有难度 - 中国DOS联盟论坛

求外网可以更换内网机器桌面壁纸的批处理。
比如http://www.123.com/wallpaper是远程服务器壁纸目录

内网机器运行批处理，读取配置文件wallpaper.ini内指定的壁纸设置为桌面。

下面是我自己写的内网控制的更改壁纸的批处理
@echo off&setlocal EnableDelayedExpansion
set "regadd=reg add "HKEY_CURRENT_USER\Control Panel\Desktop""
for /f "skip=2 tokens=2 delims==" %%i in (wallpaper.ini) do (set "dir=%%i")
for %%a in (%dir%\*.bmp) do (
set /a n+=1
set "_!n!=%%a"
)
set /a "num=%random%%%%n%+1"
%regadd%" /v TileWallpaper /d "0" /f
%regadd%" /v Wallpaper /d !_%num%! /f
%regadd%" /v WallpaperStyle /d "2" /f
RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters
cls&exit

wallpaper.ini内容如下：
::配置示例，注意最后不要加“\”。
::dir=\\Server\Wallpaper
dir=D:\test\wallpaper
::配置只要修改上面一行，其余的切勿删除，否则出错.
::本配置文件名不能改，且须和主程序置于相同目录下.

第1楼　15935643331	发表于 2008-12-20 15:04
初级用户　发帖 37　积分 42
求更换桌面壁纸的批处理，自认为有难度求外网可以更换内网机器桌面壁纸的批处理。比如http://www.123.com/wallpaper是远程服务器壁纸目录内网机器运行批处理，读取配置文件wallpaper.ini内指定的壁纸设置为桌面。下面是我自己写的内网控制的更改壁纸的批处理 @echo off&setlocal EnableDelayedExpansion set "regadd=reg add "HKEY_CURRENT_USER\Control Panel\Desktop"" for /f "skip=2 tokens=2 delims==" %%i in (wallpaper.ini) do (set "dir=%%i") for %%a in (%dir%\*.bmp) do ( set /a n+=1 set "_!n!=%%a" ) set /a "num=%random%%%%n%+1" %regadd%" /v TileWallpaper /d "0" /f %regadd%" /v Wallpaper /d !_%num%! /f %regadd%" /v WallpaperStyle /d "2" /f RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters cls&exit wallpaper.ini内容如下： ::配置示例，注意最后不要加“\”。 ::dir=\\Server\Wallpaper dir=D:\test\wallpaper ::配置只要修改上面一行，其余的切勿删除，否则出错. ::本配置文件名不能改，且须和主程序置于相同目录下.

第2楼　15935643331	发表于 2008-12-20 15:13
初级用户　发帖 37　积分 42
也就是说怎么让%dir%支持网络HTTP路径参数？

第3楼　exzzz	发表于 2008-12-23 14:51
初级用户　发帖 167　积分 194
虽然不知道如何回答你2楼的问题，但是似乎%dir%变量中不能包含某些特殊字符，所以建议你copy 随机的图片文件到本地再设置为桌面，而放在服务器上的图片，统统按顺序排名，比如从1到20这样子，以后换图片的时候不换名字就好了。个人觉得这样比较容易实现。