Pada kesempatan kali ini saya akan memberikan tips cara mengerjain orang lain dengan file-file berekstensi *.VBS . Konsep dalam pembuatannya sama seperti file *.BAT yang sudah di jelaskan pada tutorial sebelumnya. Buka notepad anda dan copy pastekan file di bawah ini dan simpan dengan nama "TERSERAH.VBS" . Langsung saja berikut ada beberapa file yang bisa digunakan sesuai dengan keinginan pembaca.
1. Iseng Mengeject CD-Drive Terus Menerus
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
2. Iseng Dengan Tombol Enter Terus Menerus
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
3. Iseng Dengan Pesan Lambat Notepad "Hello,My Name Jacka. And You?"
WScript.Sleep 180
WScript.Sleep 1000
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 1000
WshShell.AppActivate "Notepad"
WScript.Sleep 1000
WshShell.SendKeys "Hel"
WScript.Sleep 1000
WshShell.SendKeys "lo "
WScript.Sleep 1000
WshShell.SendKeys ",My "
WScript.Sleep 1000
WshShell.SendKeys "nam"
WScript.Sleep 1000
WshShell.SendKeys "e is "
WScript.Sleep 1000
WshShell.SendKeys "Jac"
WScript.Sleep 1000
WshShell.SendKeys "ka "
WScript.Sleep 1000
WshShell.SendKeys "San"
WScript.Sleep 1000
WshShell.SendKeys "to"
WScript.Sleep 1000
WshShell.SendKeys "sa"
WScript.Sleep 1000
WshShell.SendKeys " An"
WScript.Sleep 1000
WshShell.SendKeys "d Y"
WScript.Sleep 1000
WshShell.SendKeys "ou ?"
4. Iseng Dengan Backspace
MsgBox "Maaf, Anda Harus Mengulang Kembali"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
5. Iseng Dengan Keyboard
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Maaf, Keyboard Tidak Berfungsi! Harap Diperbaiki"
loop
Keterangan : masing-masing file bisa disimpan dengan nama GOKIL.VBS atau nama yang unik lainnya TERSERAHLOE.VBS trus kamu kasih temen lewat flashdisk atau yang lainnya agar dia tertarik untuk membukanya.
Jika file yang tersebut tidak bisa berjalan sebagaimana mestinya, kemungkinan kesalahan bisa terletak pada tanda petik dua "..." bisa di edit sendiri agar sesuai dengan notepad yang dipakai.
0 komentar:
Posting Komentar