VBScript 根据IE窗口的标题输出ESC（vbs弹出对话框代码）难以置信

🌐 经济型：买域名、轻量云服务器、用途：游戏网站等《腾讯云》特点：特价机便宜适合初学者用点我优惠购买

🚀 拓展型：买域名、轻量云服务器、用途：游戏网站等《阿里云》特点：中档服务器便宜域名备案事多点我优惠购买

🛡️ 稳定型：买域名、轻量云服务器、用途：游戏网站等《西部数码》特点：比上两家略贵但是稳定性超好事也少点我优惠购买

‘测试函数
PressESC “Windows Internet Explorer”, “{ESCAPE}”

‘我们要处理的函数
Function PressESC(WindowTitle, KeyCommand)
Set objShell=CreateObject(“WScript.Shell”) ‘定义一个WHS对象
If objShell.AppActivate(WindowTitle) Then ‘检测是否有我们要检测的Windows
objShell.AppActivate WindowTitle ‘把窗口对焦
objShell.SendKeys KeyCommand ‘发送一个ESC键
End If
End Function