Cara Memperbaiki Regedit Yang Tidak Bisa Dibuka / Disable By Administrator Menggunakan Notepad
1. Buka Notepad, Start > All Program > Accsories > Notepad.
2. Copykan kode berikut di notepad.
'Enable/Disable Registry Editing tools<br />
'© Doug Knox - rev 12/06/99<br />
<br />
Option Explicit<br />
<br />
'Declare variables<br />
Dim WSHShell, n, MyBox, p, t, mustboot, errnum, vers<br />
Dim enab, disab, jobfunc, itemtype<br />
<br />
Set WSHShell = WScript.CreateObject("WScript.Shell")<br />
p = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\"<br />
p = p & "DisableRegistryTools"<br />
itemtype = "REG_DWORD"<br />
mustboot = "Log off and back on, or restart your pc to" & vbCR & "effect the changes"<br />
enab = "ENABLED"<br />
disab = "DISABLED"<br />
jobfunc = "Registry Editing Tools are now "<br />
<br />
'This section tries to read the registry key value. If not present an <br />
'error is generated. Normal error return should be 0 if value is <br />
'present<br />
t = "Confirmation"<br />
Err.Clear<br />
On Error Resume Next<br />
n = WSHShell.RegRead (p)<br />
On Error Goto 0<br />
errnum = Err.Number<br />
<br />
if errnum <> 0 then<br />
'Create the registry key value for DisableRegistryTools with value 0<br />
WSHShell.RegWrite p, 0, itemtype<br />
End If<br />
<br />
'If the key is present, or was created, it is toggled<br />
'Confirmations can be disabled by commenting out <br />
'the two MyBox lines below<br />
<br />
If n = 0 Then<br />
n = 1<br />
WSHShell.RegWrite p, n, itemtype<br />
Mybox = MsgBox(jobfunc & disab & vbCR & mustboot, 4096, t)<br />
ElseIf n = 1 then<br />
n = 0<br />
WSHShell.RegWrite p, n, itemtype<br />
Mybox = MsgBox(jobfunc & enab & vbCR & mustboot, 4096, t)<br />
End If
3. Lalu Save As kode tadi dengan nama Registry.vbs dan pilih All File di bagian format filenya, lalu klik Ok.
4. Jalankan aplikasi tersebut.
5. Reboot komputer anda, dan cobalah mengakses registry editor anda.
No comments:
Post a Comment