正文

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

文章摘要

这篇文章介绍了一个用于测试指定窗口是否存在的Windows自动化脚本。通过定义名为`PressESC`的函数,可以检测指定窗口标题,并通过发送快捷键(如`ESC`)来对焦或操作该窗口。代码利用了`WScript.Shell`对象来实现这些操作,适用于需要检测特定窗口显示状态的应用场景。

 ‘测试函数 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