1

我想单击“确定”以弹出 javascript 问题。

这是我的 html 文件 (c:\temp\test.html)：

<HTML>
  <HEAD>
    <SCRIPT LANGUAGE="javascript">
      confirm( "Please click OK" );                     
    </SCRIPT>       
  </HEAD>
</HTML>

这是打开 html 文件 (c:\temp\test.vbs) 的基本 vbs 文件的开头：

Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate ("file:///C:/temp/test.html")

如何通过完成vbs文件点击“确定”按钮？

编辑：无法更改 html，因为他来自机器人硬件，并且制造商不允许对其代码进行任何更改（我帖子中的 .html 示例代码只是他们使用哪种 msgbox 的示例）

“sendkey”选项是一个不错的选择，但就我而言，我无法在服务器上执行此操作。vbscript 比我发布的 vbscript 难得多，并且根据经验，“sendkey”选项不会给出 100% 的准确结果（如果 msgbox 没有显示并且我 sendkey“enter”，它可以做关键的事情）。我将更多地使用这种命令行：ie.Document.all.Item("Ok").Click ，但我没有找到 javascript "confirm" msgbox 类型的替代方法。

4

1 回答 1

1

您可以通过使用 SendKeys 或使用不同类型的“确认”框来执行此操作。

SendKeys，把它放在后面IE.Navigate：

Set objShell = CreateObject("Wscript.shell")
objShell.AppActivate("c:\temp\test.html")
WScript.Sleep 100
objShell.SendKeys "{ENTER}"

不同类型的确认：

将此添加到 .html

<input type="submit" id="Confirmed" value="Yes" onClick="runConfirmCode">
<input type="button" id="NotConfirmed" value="No" onClick="runNotConfirmedCode">

然后在 .vbs 之后添加这个IE.Navigate

IE.Document.getElementByID("Confirmed").click
于 2013-10-15T19:43:08.040 回答