中国DOS联盟
-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
|
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-12 15:08 |
共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行 |
| DOS批处理 & 脚本技术（批处理室） » [已结]求批处理改桌面背景（论坛里搜索了，都不成功） |
| 可打印版本 998 / 4 |
| 第1楼 lywlhs | 发表于 2008-12-30 21:25 |
| 初级用户 发帖 10 积分 25 | |
|
[已结]求批处理改桌面背景（论坛里搜索了，都不成功） 今天想弄个批处理换桌面背景。找了找这样的批处理还挺好找的。
但全都用不了。运行了以后要么就是没反应。要么就是桌面背景被换成“无”了。还请高手指点一下。 [ Last edited by HAT on 2008-12-31 at 01:55 ] |
|
| 第2楼 lywlhs | 发表于 2008-12-30 21:43 |
| 初级用户 发帖 10 积分 25 | |
|
问题已经解决，找到了一个VBS改的。很好很强大。
DIM WSH DIM objShell DIM wallname Randomize wallname="c:\123\" + cstr(Int((1 * Rnd) + 1)) + ".bmp" SET WSH=WSCRIPT.CreateObject("WSCRIPT.SHELL") WSH.Regwrite"HKCU\Control Panel\Desktop\Wallpaper",wallname,"REG_SZ" set objShell=wscript.createObject("wscript.shell") iReturn=objShell.Run("RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters", 0, TRUE) 代码是这样的，虽然看不懂，但确实改成功了。在论坛里和baidu上找了好多批处理，都改不成功，无意中看到了这个vbs。居然成功了。这太打击我学习批处理 的信心了。我还是菜菜鸟，说不对的地方，请别喷我。 |
|
| 第3楼 HAT | 发表于 2008-12-31 01:55 |
| 版主 发帖 5,017 积分 9,023 | |
|
不知道楼主有没有搜索到这个：http://www.cn-dos.net/forum/viewthread.php?tid=41491
|
|
| 第4楼 clamber | 发表于 2010-03-19 11:30 |
| 初级用户 发帖 39 积分 46 | |
|
http://upload.cn-dos.net/img/480.rar
我写的，本坛，早于你搜索时间 |
|
| 第5楼 clamber | 发表于 2010-03-19 11:31 |
| 初级用户 发帖 39 积分 46 | |
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |