set WshShell = WScript.CreateObject("WScript.Shell") WshShell.SendKeys "^{ESC}" WScript.Sleep 10 WshShell.SendKeys "us"