riiiiiiiiiio
kaskuser
riiiiiiiiiio's Avatar
UserID: 2070434
Join Date: Sep 2010
Location: Kebon jeruk Kaskuser: Yes
Posts: 240
Blog Entries: 3
riiiiiiiiiio tidak memiliki reputasi
Virus Isengin kompi kawan agan neh
Lets begin! Pastikan Agan Mengetik atau copy Dengan Benar Script Dibawah Ini! Copy Paste Kadang Tidak Berhasil Dikarenakan Perbedaan Tanda Petik ( ” ” ) Pada Notepad, Untuk Lebih Fix Bisa Pake TextPad
1. Iseng Mengeject CD-Drive Terus Menerus
Spoiler for Nih scriptnya...:
Quote:
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
Copy dan paste Script di atas Kemudian agan save dengan nama terserah agan dengan ekstensi .VBS & Berikan keteman Agan
2. Iseng Dengan Tombol Enter Terus Menerus
Spoiler for Nih scriptnya...:
Quote:
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
Copy dan paste Script di atas Kemudian agan save dengan nama terserah agan dengan ekstensi .VBS & Berikan keteman Agan
3. Iseng Dengan Pesan Lambat Notepad “Hello, how are you? I am good thanks!”
Spoiler for Nih scriptnya...:
Quote:
WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject(“WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hel”
WScript.Sleep 500
WshShell.SendKeys “lo ”
WScript.Sleep 500
WshShell.SendKeys “, ho”
WScript.Sleep 500
WshShell.SendKeys “w a”
WScript.Sleep 500
WshShell.SendKeys “re ”
WScript.Sleep 500
WshShell.SendKeys “you”
WScript.Sleep 500
WshShell.SendKeys “? ”
WScript.Sleep 500
WshShell.SendKeys “I a”
WScript.Sleep 500
WshShell.SendKeys “m g”
WScript.Sleep 500
WshShell.SendKeys “ood”
WScript.Sleep 500
WshShell.SendKeys ” th”
WScript.Sleep 500
WshShell.SendKeys “ank”
WScript.Sleep 500
WshShell.SendKeys “s! “
Copy dan paste Script di atas Kemudian agan save dengan nama terserah agan dengan ekstensi .VBS & Berikan keteman Agan
capek gan copy paste,..
liat aja dari sini gan http://www.kaskus.us/showthread.php?t=5637919 neh diskusi agan rioo di kaskus
gua cuma numpang share aja punya agan rioo,..
selamat mencuba,...
Tidak ada komentar:
Posting Komentar