Dim WSHShell
Set WSHShell=WScript.CreateObject("WScript.Shell")
WSHShell.Popup "下面将HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\子键下的键值项'DisableRegistryTools'删除"
WSHShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools"
WSHShell.Popup "下面将HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\及下面的所有内容完全删除"
WSHShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\"
请把以上内容复制到记事本,保存的文件后缀名为vbs, 双击就解锁!!如注册表没锁,那就无效!!