fake virus

deci!!,ca sa creezi un virus trebuie sa faci urmatorul lucru

msgbox "Sal"
msgbox "esti bine?"
msgbox "aha"
msgbox "si eo"
msgbox "uite....."
msgbox "ti se va opri calculatorul si nu se va mai aprinde"
msgbox "ar fi bine sa dai restart"
msgbox "iti va lua foc hardu`"
Dim wshshell
set wshshell = wscript.CreateObject("WScript.Shell")
wshshell.run "shutdown -s -t 20"