Как отправить мышь до div с помощью VBScript
У меня есть простой VBScript, который выполняет следующие действия:
- Открыть браузер
- Заполните поля ввода (логин, пароль и т. Д.)
На странице есть кнопка (похоже) для отправки информации. Событие щелчка для этой кнопки не работает, потому что это кнопка 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
2 ответа
Может инициировать события, используя метод fireEvent.
.getElementByID("div-button").fireEvent "onmouseup"
Я решил свою проблему с помощью
Function Main
' ...
Dim objShell
Set objShell = CreateObject("WScript.Shell")
objShell.SendKeys "{TAB}"
objShell.SendKeys "{TAB}"
objShell.SendKeys "{ENTER}"
End Function