Как нажимать кнопку на веб-странице с помощью VB?

Question

Я создаю скрипт VB, который нажимает кнопку на веб-странице. Я видел ответы, такие как this, где они отправляют форму. Я не хочу этого, потому что мне нужно щелкнуть по кнопке со сценарием, чтобы задействовать обычный рабочий процесс нажатия кнопки.

Кстати, я использую GWT и SmartClient, что делает его немного более сложным, поскольку идентификаторы становятся запутанными. Чтобы преодолеть это, я использую GWT DEBUG_ID_PREFIX

Answer 1

Было бы неплохо, если бы вы дали образец кнопки GWT для получения помощи для тех, кто не знаком с GWT, как я. Я нашел страницу, содержащую кнопку GWT (надежда) и написал что-то на ее основе.
Рассмотрим следующий код.

Sub WaitUntil(varObj) 
    On Error Resume Next 
    Do 
     WScript.Sleep 100 
    Loop Until Not varObj Is Nothing 
    WScript.Sleep 500 
End Sub 

Dim IE 
Set IE = CreateObject("InternetExplorer.Application") 
    IE.Visible = True 
    IE.Navigate "http://gwt.google.com/samples/Showcase/Showcase.html#!CwBasicButton" 
    WScript.Sleep 500 
    WaitUntil IE.Document 'wait until the document is ready 
    WaitUntil IE.Document.getElementById("gwt-debug-cwBasicButton-normal") 'wait until the button is initialized 
    Dim theButton 
    Set theButton = IE.Document.getElementById("gwt-debug-cwBasicButton-normal") 
     theButton.Click 
     'theButton.fireEvent "onclick" 'another way 
Set IE = Nothing