Blog Kumpulan Artikelku

MENON AKTIF ATAU MENG AKTIFKAN RUN

| Jumat, 29 Mei 2009
Pertama - tama Kaka, Om, or Tante 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 Kaka, Om, or Tante ) kemudian save ditempat yang Kaka, Om, or Tante mudah diinget-------


Terakhir tinggal Kaka, Om, or Tante 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.



0 komentar:

Posting Komentar