Mengaktifkan dan MenNon aktifkan RUN
-------Lalu copy dan paste script program dibawah ini dan simpan.... selanjutnya silahkan klik 2 kali file yang tersimpan pada folder yang anda pilik (lebih mudahnya anda simpan di dekstop aja biar mudah mencarinya) lalu masukan angka 0 untuk aktifkan Run windows dan angka satu 1 untuk nonaktifkan (jangan di ubah file dibawah ini, anda tinggal copy paste aja :
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