VBS - IE - 在javascript弹出窗口中单击“确定”的脚本

时间:2013-10-15 13:57:01

标签: javascript vbscript

我想点击“确定”弹出一个javascript问题。

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

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

这里是打开html文件的基本vbs文件的开头(c:\ temp \ test.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没有显示并且我发送密钥“输入”,它可以做关键的东西)。我在那种命令行中更多:ie.Document.all.Item(“Ok”)。点击,但我没有找到javascript“确认”msgbox类型的替代方案。

1 个答案:

答案 0 :(得分: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