0

我有 xp 的 destkop 背景。我想运行一个批处理文件,将我当前的背景更改为默认值 None ,它只是纯色。如果有人有一个例子,那就太好了。

谢谢

4

1 回答 1

0

我最终放弃了这个想法,因为在我发现另一个问题后我不需要它,但我确实找到了一个我不记得的好网站,它给出了使用 vbscript 读取和写入注册表项的示例。我能够在我的桌面上有一些壁纸并将这个 vbscript 放入我的启动中,以便壁纸将恢复为“无”纯色样式。看起来像这样

Option Explicit

Dim SysVarReg, Value, NewValue

Set SysVarReg = WScript.CreateObject("WScript.Shell")

' Read current value of desktop wallpaper
value = SysVarReg.RegRead ("HKEY_CURRENT_USER\Control Panel\Desktop\Wallpaper")

' Display to screen for testing
'MsgBox(value)


NewValue = ""

' Reset the value of the wallpaper to an empty string for the default no wallpaper
SysVarReg.RegWrite "HKEY_CURRENT_USER\Control Panel\Desktop\Wallpaper", NewValue

' Display to screen again for testing
'MsgBox(NewValue)
于 2013-01-11T22:14:12.780 回答