如何使用VBScript将鼠标发送到div

Question

我有简单的VBScript执行下一步操作：

1. 打开浏览器
2. 填写输入（登录名，密码等）

有用于在页面上发送信息的按钮（看起来像）。 此按钮的单击事件不起作用，因为它是GWT按钮。 我想发送到这个按钮MouseUp事件。

如何使用VBScript执行此操作？

Function Main
 Set IE = WScript.CreateObject("InternetExplorer.Application", "IE_")
 IE.Visible = True
 IE.Navigate "http://example.com"
 With IE.Document
  .getElementByID("login").value = "Login"
  .getElementByID("password").value = "Password"
  'It doesn't work
  .getElementByID("div-button").MouseUp 
 End With
End Function

Answer 1

可以使用fireEvent方法触发事件。

.getElementByID("div-button").fireEvent "onmouseup"

Answer 2

我使用

解决了我的问题

Function Main
 ' ...
 Dim objShell
 Set objShell = CreateObject("WScript.Shell")
 objShell.SendKeys "{TAB}"
 objShell.SendKeys "{TAB}"
 objShell.SendKeys "{ENTER}"
End Function