windows-7 - 如何使用 vbscript 添加或更改注册表项的权限？

Question

我想使用 vbscript（或我可以在 Windows 7 机器上本地运行的一些脚本语言）并更改注册表项的权限。

我看到了 regini，但它很旧，我不知道如何使用它来满足我的需要。具体来说，作为一个例子，我需要添加：

nt service\BFE到HKLM\currentcontrolset\services\bfe\parameters\policy. 然后我要使用advanced，添加bfe，然后使用set、read、query value、delete等特定权限，但不能完全控制。

如何使用脚本语言以编程方式执行此操作？

谢谢。

Answer 1

使用regini.exe。

所以我将无法设置用户完全控制，但每个人都完全控制。

有关 regini 脚本中使用的值的详细信息，请参阅以下文章：

• 如何使用 Regini.exe 设置注册表项的权限

• 如何：使用脚本从命令行更改注册表权限

在这里，您有将使用 regini.exe 及其脚本的 VBScript：

' Create a temp file with the script that regini.exe will use
'
set oFSO = CreateObject("Scripting.FileSystemObject")
strFileName = oFSO.GetTempName
set oFile = oFSO.CreateTextFile(strFileName)
oFile.WriteLine "HKEY_LOCAL_MACHINE\Software\Classes\AlejaCMaTypelib [1 5 7 11 17]"
oFile.WriteLine "HKEY_LOCAL_MACHINE\Software\AlejaCMaCo\AlejaCMaApp [1 5 7 11 17]"
oFile.Close

' Change registry permissions with regini.exe
'
set oShell = CreateObject("WScript.Shell")
oShell.Run "regini " & strFileName, 8, true

' Delete temp file
'
oFSO.DeleteFile strFileName

WScript.Echo "Done!"