Arifudin dot Net

Tulisan ini adalah re-post dari blog saya sebelumyna, ya.. itung-itung juga buat postingan perdana dalam rangka lhouncing blog baru

Ini adalah trik untuk men-shutdown windows dengan hanya klik kanan, OK langsung saja caranya buka notepad anda, lalu ketikan kode dibawah ini atau langsung saja copy paste :

var vbCancel = 2;
var vbYesNoCancel = 3;
var vbYes = 6;
var vbNo = 7;
var vbQuestion = 32;
var vbInformation = 64;
var natan = WScript.CreateObject(‘WScript.Shell’);
var kata = ‘http://coretan-arifudin.blogspot.com’;
var pesan1 = ‘Option:\n’+
‘————————–\n\n’+
’1. Click ["Yes"] -> instal.\n’+
’2. Click ["No"] -> remove.\n’+
’3. Click ["Cancel"] -> stop.\n\n’+
‘>> Pilihan anda? <<’ var tanya = natan.popup(pesan1,0,kata,vbYesNoCancel+vbQuestion); if (tanya == vbYes) { natan.RegWrite(‘HKCR\\Directory\\shell\\mati\\’, ‘> Matikan Windows!’,'REG_SZ’);
natan.RegWrite(‘HKCR\\Directory\\shell\\mati\\command\\’,
‘shutdown.exe -s -t 0′,’REG_SZ’);
natan.RegWrite(‘HKCR\\Drive\\shell\\mati\\’,
‘> Shutdown Windows!’,'REG_SZ’);
natan.RegWrite(‘HKCR\\Drive\\shell\\mati\\command\\’,
‘shutdown.exe -s -t 0′,’REG_SZ’);
pesan2 = ‘Penginstalan selesai!’;
natan.popup(pesan2,0,kata,vbInformation);
}
else if (tanya == vbNo)
{
natan.RegDelete(‘HKCR\\Directory\\shell\\mati\\command\\’);
natan.RegDelete(‘HKCR\\Directory\\shell\\mati\\’);
natan.RegDelete(‘HKCR\\Drive\\shell\\mati\\command\\’);
natan.RegDelete(‘HKCR\\Drive\\shell\\mati\\’);
pesan3 = ‘Shutdown dengan klik kanan telah dihapus!’;
natan.popup(pesan3,0,kata,vbInformation);
}
else
{
pesan4 = ‘Cancel!’;
natan.popup(pesan4,0,kata,vbInformation);
}

kemudian simpan dengan ekstensi *.js
untuk memnajalankannya cukup dengan double klik filenya, atau klik kanan lalu pilih open with command promt, maka akan muncul kotak dialog seperti pada gambar. klik “instal” untuk
memasang, klik “no” untuk melepas atau meremovenya, dan “cancel” untuk membatalkannya. kode diatas dapat anda modifikasi sendiri sesuai dengan keinginan.

Semoga bermanfaat