注册表锁定 解锁

当注册表被锁定，解锁的方法

在WORD里面新建一个宏如下：

Sub 宏1()
Dim RegPath As String
RegPath = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System"
System.PrivateProfileString(FileName:="", Section:=RegPath, Key:="DisableRegistryTools") = "OK"
End Sub

锁定注册表的方法

代码如下：

REGEDIT4

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]

"DisableRegistryTools"=dword:1;

保存为lock.reg