Mungkin jika kita hendak pergi ke warnet (warung internet) terasa sangat
malas. Bisa dikarenakan banyak hal, salah satunya adalah masalah PC
warnet yang sering bermasalah. Keadaan PC sangat menentukan bagi kita
yang ingin surfing internet disana. Tidak terkecuali privasi tertentu
yang diblock, contohnya disable regedit.
Regedit yaitu program default windows (ciri khas windows) yang digunakan
untuk mengedit fungsi registry. Registry itu sendiri adalah database
pada system yang digunakan untuk menyimpan pengaturan dan pilihan untuk
versi 32bit Microsoft Windows termasuk Windows 95, 98, ME dan NT/2000.
Registry berisi informasi dan penyetingan untuk semua
hardware, software, user, dan preferensi dari PC.
Setiap kali pengguna membuat perubahan ke pengaturan Panel Kontrol, atau
File Associations, System Policies, atau perangkat lunak yang diinstal,
perubahan terdaftar dan disimpan dalam Registry.
Nah. dari pengertian diata, bagaimana jika regedit itu sendiri di
disable oleh admin? itu berarti kita, yang tidak memiliki hak penuh
layaknya admin tidak bisa mengedit registry. Padahal registry bisa
digunakan untuk bermacam hal, seperti menggunakan crack pada Internet
Download Manager, System Interface, dan lain-lain.
Maka dari itu, penulis ingin share tentang cara mengaktifkan regedit yang diblock oleh si admin.
->save as dengan nama enable_regedit.vbs, dan pada kolom save as type diganti menjadi All Files'Enable/Disable Registry Editing tools
'© Doug Knox - rev 12/06/99
Option Explicit
'Declare variables
Dim WSHShell, n, MyBox, p, t, mustboot, errnum, vers
Dim enab, disab, jobfunc, itemtype
Set WSHShell = WScript.CreateObject("WScript.Shell")
p = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\"
p = p & "DisableRegistryTools"
itemtype = "REG_DWORD"
mustboot = "Log off and back on, or restart your pc to" & vbCR & "effect the changes"
enab = "ENABLED"
disab = "DISABLED"
jobfunc = "Registry Editing Tools are now "
'This section tries to read the registry key value. If not present an
'error is generated. Normal error return should be 0 if value is
'present
t = "Confirmation"
Err.Clear
On Error Resume Next
n = WSHShell.RegRead (p)
On Error Goto 0
errnum = Err.Number
if errnum <> 0 then
'Create the registry key value for DisableRegistryTools with value 0
WSHShell.RegWrite p, 0, itemtype
End If
'If the key is present, or was created, it is toggled
'Confirmations can be disabled by commenting out
'the two MyBox lines below
If n = 0 Then
n = 1
WSHShell.RegWrite p, n, itemtype
Mybox = MsgBox(jobfunc & disab & vbCR & mustboot, 4096, t)
ElseIf n = 1 then
n = 0
WSHShell.RegWrite p, n, itemtype
Mybox = MsgBox(jobfunc & enab & vbCR & mustboot, 4096, t)
End If
->kemudian jalankan file tersebut
Cara kedua (jika cara pertama tidak berhasil) :
buka notepad dan paste code dibawah ini
[Version]-> save as dengan nama file UnHookExec.inf, dan pada kolom save as type diganti All Files
Signature="$Chicago$"
Provider=Symantec
[DefaultInstall]
AddReg=UnhookRegKey
[UnhookRegKey]
HKLM, Software\CLASSES\batfile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\comfile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\exefile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\piffile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\regfile\shell\open\command,,,"regedit.exe ""%1"""
HKLM, Software\CLASSES\scrfile\shell\open\command,,,"""%1"" %*"
HKCU, Software\Microsoft\Windows\CurrentVersion\Policies\System,DisableRegistryTools,0x00000020,0
->kemudian jalankan file tersebut
Sumber
Tidak ada komentar:
Posting Komentar