!!! Esto es para fines educativos solamente.!
Hola chicos, hoy voy a contarte cómo hacer un Vbs Virus.
Paso 1 copia el siguiente código
X DIM
Dim una
set x=Createobject("Wscript.shell")
x.Run "cmd.exe"
hacer
x.SendKeys "Tipo en sus claves aquí"
x.SendKeys "{aquí las llaves como entrar esc etc....} opcional si quieres. Escriba sus claves"
lazo
Paso 2:save con la configuración que se muestra como la imagen.
Consejo: usted puede encontrar el suplente llaves aquí http://www.devguru.com/technologies/wsh/17420