Keyboard looping trick

This VBS trick can make any of your friend's keyboard type any message continuously.
 Open Notepad, write the code given below in NotePad and save the file as Mad.vbs .
 You will need to restart your computer to stop this.
 Try this after closing all important programs.

CODE:


Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Replace With Your Message."
loop