vbscript - objshell.regwrite 不起作用

Question

它适用于：

Set objShell = CreateObject("WScript.Shell")
objShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions", 1, "REG_DWORD"
Set objShell = Nothing

但它不适用于：

Set objShell = CreateObject("WScript.Shell")
objShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDrives", 3FFFFFF, "REG_DWORD"
Set objShell = Nothing

对于第二个，它将有一个语句结束错误。这是为什么？

Answer 1

你的答案就在这里（阅读整个页面，还有 vbs 示例代码）。

请注意，只能将十进制值添加为字符串（如文章中所述）。

Answer 2

您收到错误是因为3FFFFF它既不是有效的变量名，也不是十六进制数的有效表示法。尝试这个：

objShell.RegWrite "HKCU\...\NoDrives", &h3FFFFFF, "REG_DWORD"