set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "{ESC}"