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

你的回答是here（阅读整个页面，还有vbs示例代码）。

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

Answer 2

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

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