如何在VBScript中自动关闭“确定”窗口？

Question

我需要通过按 Enter 自动关闭程序中的“确定”窗口。

我试图用VBScript做到这一点，但这给了我一个错误。

Set objshell = WshShell.Sendkeys "{Enter}" ("wscript.shell")
objshell.Run,0, True
exit

错误是：

  

行：1
  字符：34
  错误：指令即将结束
  代号：800A0401
  来源：Microsoft Vbscript编译错误

Answer 1

如有疑问，请阅读documentation。 VBScript中没有内部对象WshShell。您需要创建一个WScript.Shell实例并将其分配给该变量，然后才能在其上调用SendKeys方法。

Set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "{Enter}"

您可能首先需要使用AppActivate将要发送按键的窗口移到最前面。

无论如何，看看您的三行代码在语法上是如何被完全破坏的，我 很强 ，建议您先查找VBScript教程，然后再继续进行。

还请注意，SendKeys是一种极其不可靠的自动化方法。您可能想研究类似AutoIt的东西。