VBScript - 如何使用 Sendkeys 而不会循环和崩溃我的计算机？

如何解决VBScript - 如何使用 Sendkeys 而不会循环和崩溃我的计算机？

我正在尝试使用 Enter SendKey，出于某种原因，它实际工作的唯一方式 - 有点 - 是我从另一个示例中找到的这样的：

Do  
  wshell.SendKeys "{ENTER}"
Loop

显然，因为这是在一个循环中，这就是它要做的......循环。因此，我单击的所有内容都按 Enter，直到我单击另一个窗口，它会一直按 Enter，直到我最终重新启动计算机。

但是如果我把它从循环中取出来，它根本就不起作用。此外，即使我在循环中使用它，但我已经尝试过：

wshell.AppActivate "Internet Explorerer"

我仍然需要点击 IE 窗口才能让它真正“按下”回车

如何使用 SendKeys 使其不循环并且您不必手动单击 IE 窗口即可运行？

注意：我只能使用 VBScript，不能使用 VBA 或其他任何东西。

解决方法

我发现问题不在于 SendKeys，而是重点在于 HTA 而不是 IE，因此当它运行时，没有任何东西可以按 Enter。

我能够使用这个完全解决问题：

wshell.AppActivate("title")
wshell.SendKeys "{ENTER}"