Isengin temen dgn CD-ROM kluar masuk tak beraturan

Selasa, 09 Maret 2010

buat yg suka isengin temen/org yg sok ngerti ma komputer, qta buat CD-ROM Keluar Masuk Tanpa Henti, penasaran kan caranya seperti apa, Caranya juga gampang banget, namun efek yang akan terjadi cukup membuat orang pusing, karena CD-ROM nya tidak berhenti keluar masuk. Bagaimana tertarik gag untuk membuat scriptnya. Ya buat iseng-iseng aja dri pda bengong kan hehehe.... 
Langsung aja kita bikin scriptnya

  • Buka aplikasi notepad, hihihihi.. lgi² notepad yg jdi jurus hehehe...
  • Copy paste script dibawah ini :
Set oWMP = CreateObject(”WMPlayer.OCX.7″)
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
  • Setelah di Copy Paste jangan lupa di save, ketika proses saving yakinkan extension file tersebut mesti .vbs contohnya buat aja nama file jahil.vbs
  • Kalau sudah berhasil di save, silahkan jalankan file jahil.vbs tersebut dgn klik seperti membuka program dan lihat hasilnya.
hehehehe... tunggu yg laen pasti bakalan tak posting buat kalian².. wokeyyy met mencubbaa..

0 komentar: