Mengaktifkan dan mematikan registry di windows xp

Haiiii kawand blogg...

lama juga ga posting,

btw pernah ga merhatiin registry komputer kita????

Emang c bwt user komputer yang awam(kyk gw), hal ini sering di sepelekan.
TAPI hati2 loch, registry bisa jadi masalah buat komputer kita sekaligus menjadi barokah untuk para hacker dan virus....
Kompi kita bisa jadi lemot or masalah kompi lainnya yg mungkin bervariasi gara2 registry kita acak2'an..

Dalam posting gw kali ini, gw mu menolong teman2 semua bagaimana caranya mengamankan registry kita dengan cara mengaktifkan ataupun mematikan registry dengan cara yang mudah dan cepat...

Temen2 semua tinggal copy paste listing program di bawah ini(pake notepad juga bisa qo) dan simpen dengan eksistensi .vbs

Gampang khan,,,,,

Gampang donk.......


-----------------------------------

dim mada

masuk()

sub masuk()

set mada = wscript.CreateObject("wscript.shell")

keterangan = "Pilihan:" & vbcrlf &_

"[0].Aktifkan Regedit." & vbcrlf &_

"[1].Nonaktifkan Regedit." & vbcrlf & vbcrlf &_

"[Program Karya Mada arya]"

tanya = inputbox(keterangan,"Edit Regedit",0)

mada.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion" &_

"\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"

mada.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

--------------------------------------------------------------------




Thank's ia udh mu berkunjung k blog gw, jgn lupa ksh koment ia....