mungin saat ngenet di warnet anda mencoba membuka regedit tapi ternyata regristri editor nya di blok oleh admin/operator warnet, mau PC anda regeditnya dinonaktifkan? kalo mau buka notepad terus copykan script dibawah.
dim regt
masuk()
sub masuk()
set regt = wscript.CreateObject("wscript.shell")
keterangan = "Pilihan:" & vbcrlf &_
"[0].Aktifkan Regedit." & vbcrlf &_
"[1].Nonaktifkan Regedit." & vbcrlf & vbcrlf &_
"[Cheattahh]"
tanya = inputbox(keterangan,"Edit Regedit",0)
regt.RegWrite"HKCU\Software\Microsoft\Windows\Curr entVersion" &_
"\Policies\System\DisableRegistryTools",tanya,"REG _DWORD"
if tanya=1 then
msgbox "Registry dinonaktifkan",vbInformation,"Edit Regedit"
else
if tanya=0 then
msgbox "Registry diaktifkan",vbInformation,"Edit Regedit"
regt.RegDelete"HKCU\Software\Microsoft\Windows\Cur rentVersion" &_
"\Policies\System\DisableRegistryTools"
else
msgbox "Masukkan angka 0 atau 1!",vbInformation,"Edit Regedit"
masuk()
end if
end if
end sub
simpan dengan nama disable.vbs jangan lupa saat save as pada kotak save as type ganti ke *.*all files. nama disable mau di rubah juga boleh yang penting ekstensinya .vbs
sekian terimakasih
No comments:
Post a Comment
Ada pertanyaan atau mau diskusi silahkan tinggalkan komentar