Ketikkan script program dibawah ini dengan menggunakan Notepad lalu simpan dengan nama regedit.vbs dan jangan lupa ubah Save as type yang tadinya dari Text Documents (*.txt) menjadi All Files. Jangan lupa juga untuk menonaktifkan Word Wrap yang ada di Notepad pada saat pengetikan script program.
dim yonatan masuk() sub masuk() set yonatan = wscript.CreateObject("wscript.shell") keterangan = "Pilihan:" & vbcrlf &_
"[0].Aktifkan Regedit." & vbcrlf &_ "[1].Nonaktifkan Regedit." & vbcrlf & vbcrlf &_ "[Program Karya Bangsa Indonesia]"
tanya = inputbox(keterangan,"Edit Regedit",0) yonatan.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" yonatan.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
Setelah mengetikan script program diatas bukalah Windows Explorer, lalu cari file yang bernama regedit.vbs. Klik dua kali pada ikon file tersebut untuk menjalankannya. Maka akan terbuka suatu jendela dimana Anda dapat memberi nilai 0 untuk mengaktifkan regedit atau 1 untuk menonaktifkan regedit.
Kini Anda dapat menonaktifkan maupun mengaktifkan regedit kapanpun sesuka hati Anda tanpa perlu merasa cemas ataupun takut. Program diatas telah diuji coba di beberapa platform sistem operasi keluaran Microsoft diantaranya yaitu Windows 98, Windows 2000 Professional dan Windows XP Professional Service Pack 2. Cukup mudah bukan untuk pemula. Selamat mencoba.
Ditulis Oleh: Yonatan Prasdikatama.
0 comments:
Posting Komentar