Crazy Caps Lock Trick

This constantly turns caps lock on and off really fast continuously. 
Code:- 
Set wshShell =wscript.CreateObject(”WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop