Mengaktifkan dan MenNon aktifkan RUN

Pertama - tama buka program Notepad, or Textpad, or program apa aja yang bisa yang bisa ngesave menjadi file .vbs. . .
-------Lalu ketikkan script program dibawah ini :

dim IDC
masuk()
sub masuk()
set IDC = wscript.CreateObject("wscript.shell")
keterangan = "Pilihan:" & vbcrlf &_
"[0].Aktifkan Run." & vbcrlf &_
"[1].Nonaktifkan Run." & vbcrlf & vbcrlf &_
"[Indonesia Coder Team]"

nilai = inputbox(keterangan,"Edit Run",0)

IDC.RegWrite"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun",nilai,"REG_DWORD"

if nilai=1 then
msgbox "Run dinonaktifkan",vbInformation,"Edit Run"
else
if nilai=0 then
msgbox "Run diaktifkan",vbInformation,"Edit Run"

IDC.RegDelete"HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun"

else
msgbox "Masukkan angka 0 atau 1!",vbInformation,"Edit Run"
masuk()
end if
end if

end sub





Lalu simpan dengan nama Run.vbs ( nama tidak harus Run... bisa diganti dengan kemauan anda sendiri..kemudian save ditempat yang anda inginkan

Terakhir tinggal klik dua kali pada ikon file tersebut untuk menjalankannya. Maka akan terbuka suatu jendela dimana Anda dapat memberi nilai 0 untuk mengaktifkan Run atau 1 untuk menonaktifkan Run.

" jangan menyerah ...heee .. "