Berikut Caranya:
- Buka program notepad.
- Copy-pastekan kode dibawah ini pada notepad:
- Simpan file dengan ekstensi .js dan simpan sebagai "all files".
- Klik pada file .js yang telah sobat buat tadi.
- Jika ada pilihan, pilih instal.
- Setelah itu tinggal klik kanan pada tombol startmenu, maka akan muncul teks "Matikan Windows".
// Program Sederhana Matiin Komputer Via Klik Kanan
// Programmer : Yonatan Prasdikatama
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://www.mampirbro.blogspot.com ::.';
var pesan1 = 'Pilihlah opsi berikut ini:\n'+
'--------------------------\n\n'+
'1. Klik ["Yes"] -> untuk Pasang.\n'+
'2. Klik ["No"] -> untuk Copot.\n'+
'3. Klik ["Cancel"] -> untuk Berhenti.\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\\',
'> Matikan Windows!','REG_SZ');
natan.RegWrite('HKCR\\Drive\\shell\\mati\\command\\',
'shutdown.exe -s -t 0','REG_SZ');
pesan2 = 'Selesai di pasang!';
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 = 'Selesai di copot!';
natan.popup(pesan3,0,kata,vbInformation);
}
else
{
pesan4 = 'Berhenti!';
natan.popup(pesan4,0,kata,vbInformation);
}
Penampakan:
Semoga berguna dan bermamfaat...
Semoga berguna dan bermamfaat...
Gunakan layanan 4shared generator (klik di sini ) untuk mempermudah mendonwload file dari 4shared tanpa perlu login.
hatur nuhun
klo mau ngilangin gmn tu gan?? jawabbannya send email ku y pls
>> justforgamee@gmail.com<<
@Hiro: cek inbox gan :)
Gan dia kebaca Adobe Dreamweaper tu klo di komp ane.
jd gmn buat runnya.???
pliss jawabannya..
trs ada yg mau ane tanya..
gua pnya masalah ama mozila ane,cz waktu ane instal ulang mozila dia mnta pass ama nickname admint.
gmn tu gan ada gk solusinya..
klo perlu Ss entr ane kirim.
@rio nt pake windows apa gan?
ane nyobanya di xp
sebelum'a mozilla nt apa ada dipasangin password?
bwt windows 7 kaga bsa y gan ?
.:: Quraudo™::.