Membuka Registri yang di disable dengan Notepad

Home » » Membuka Registri yang di disable dengan Notepad
Nah!! sahabat bloger mungkin bingung jugakan kalo menu Run di disable atau Registrinya di disable tapi ga usah kuatir di tutor kali ini saya akan mengulas tentang Merubah Registri dengan Notepad...
oklah dari pada panjang lebar kita lagsung saja ke TKP.. hehe

1.Membuka Run dialog

buka notepad trus paste in code dibawah ini


Code:
Set WshShell = CreateObject("WScript.Shell")
Var_YN = MsgBox("Enable Run Dialog?", vbYesNo, "I-T[e]ChNoLoGy Corp Ltd")
If Var_YN = 6 Then

WshShell.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun",0,"REG_DWORD"

Else
WshShell.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun",1,"REG_DWORD"
Var_Ok = MsgBox("Run Dialog is Disabled!", vbOkOnly, "I-T[e]ChNoLoGy Corp Ltd")

End If
kmudian save menggunakan extensi vbs (contoh: Run.vbs) trus dijalanin deh filenya


2. Membuka Regedit

buka notepad trus paste in code dibawah ini


Code:
Set WshShell = CreateObject("WScript.Shell")
Var_YN = MsgBox("Enable Registry Editor?", vbYesNo, "I-T[e]ChNoLoGy Corp Ltd")
If Var_YN = 6 Then

WshShell.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools",0,"REG_DWORD"
WshShell.Run("RegEdit.EXE")

Else
WshShell.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools",1,"REG_DWORD"
Var_Ok = MsgBox("Registry Editor is Disabled!", vbOkOnly, "I-T[e]ChNoLoGy Corp Ltd")

End If
kmudian save menggunakan extensi vbs (contoh: Regedit.vbs) trus dijalanin deh filenya

contoh diatas juga dapat digunakan untuk virus yang meneyerang kebagian disable registri dan menu run
.
Share this article :