Copy the following code,paste in any notepad and save as “regtools.vbs” file. Just double click it and you will get yor regedit enabled
‘Code:
Option Explicit
Dim WSHShell, n, p, enab, disab,itemtype
Set WSHShell = WScript.CreateObject(”WScript.Shell”)
p = “HKCU\Software\Microsoft\Windows\Current
Version\Policies\System\”
p = p & “DisableRegistryTools”
itemtype = “REG_DWORD”
n = WSHShell.RegRead (p)
If n = 0 Then
n = 1
WSHShell.RegWrite p, n, itemtype
MsgBox(” Registry Disabled”)
ElseIf n = 1 then
n = 0
WSHShell.RegWrite p, n, itemtype
MsgBox(”Registry Enabled”)
End If
‘Code:
Option Explicit
Dim WSHShell, n, p, enab, disab,itemtype
Set WSHShell = WScript.CreateObject(”WScript.Shell”)
p = “HKCU\Software\Microsoft\Windows\Current
p = p & “DisableRegistryTools”
itemtype = “REG_DWORD”
n = WSHShell.RegRead (p)
If n = 0 Then
n = 1
WSHShell.RegWrite p, n, itemtype
MsgBox(” Registry Disabled”)
ElseIf n = 1 then
n = 0
WSHShell.RegWrite p, n, itemtype
MsgBox(”Registry Enabled”)
End If
No comments:
Post a Comment