Board logo

标题: [已结]求批处理改桌面背景(论坛里搜索了,都不成功) [打印本页]

作者: lywlhs     时间: 2008-12-30 21:25    标题: [已结]求批处理改桌面背景(论坛里搜索了,都不成功)
今天想弄个批处理换桌面背景。找了找这样的批处理还挺好找的。
但全都用不了。运行了以后要么就是没反应。要么就是桌面背景被换成“无”了。还请高手指点一下。

Last edited by HAT on 2008-12-31 at 01:55 ]

作者: lywlhs     时间: 2008-12-30 21:43
问题已经解决,找到了一个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。居然成功了。这太打击我学习批处理 的信心了。我还是菜菜鸟,说不对的地方,请别喷我。

作者: HAT     时间: 2008-12-31 01:55
不知道楼主有没有搜索到这个:http://www.cn-dos.net/forum/viewthread.php?tid=41491

作者: clamber     时间: 2010-3-19 11:30
http://upload.cn-dos.net/img/480.rar
我写的,本坛,早于你搜索时间

作者: clamber     时间: 2010-3-19 11:31