Menjaga Registry Dengan Visual Basic Script


Registry itu adalah inti pokok dari sistem windows...
itu menurut pandangan saya aja lhoo... "sok tau banget"... Hhehee...
klo settingan registry itu udah diotak atik, apalagi error... maka sistem windows pasti juga error... Anda mau menjaga registry anda dari tangan" jail dengan VBS ?


Let's Begin....

1. Buka aplikasi notepad
2. Ketik kode berikut, klo ga mau capek copy paste aja...
jangan lupa ya Word Wrap nya dimatiin dulu...
itu lho yg di menu notepad format Word Wrap

dim royhan
masuk()
sub masuk()
set royhan = wscript.CreateObject("wscript.shell")
keterangan = "Pilihan:" & vbcrlf &_
"[0].Aktifkan Regedit." & vbcrlf &_
"[1].Nonaktifkan Regedit." & vbcrlf & vbcrlf &_
"[+] mailto:royh_and@rocketmail.com [+]"
tanya = inputbox(keterangan,"Edit Regedit",0)
royhan.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion" &_
"\Policies\System\DisableRegistryTools",tanya,"REG_DWORD"
if tanya=1 then
msgbox "Registry dinonaktifkan",vbInformation,"royhan™ Copyright 2009 Disable Registry Tools"
else
if tanya=0 then
msgbox "Registry diaktifkan",vbInformation,"Edit Regedit"
royhan.RegDelete"HKCU\Software\Microsoft\Windows\CurrentVersion" &_
"\Policies\System\DisableRegistryTools"
else
msgbox "Masukkan angka 0 atau 1!",vbInformation,"Edit Regedit"
masuk()
end if
end if
end sub

sampe nomer berapa tadi ?
ehh... jawab donk !!! ditanya kok ga dijawab...
iya, inget sampe no.2
3. Save file dengan nama terserah anda, tapi inget type nya diganti jadi "All Files"
jangan lupa diakhir nama file ditambah ".vbs" contoh "royh.vbs"

udah... silahkan Mencoba...!!!






0 Response to Menjaga Registry Dengan Visual Basic Script

Post a Comment