Question

我正在创建一个单击网页上按钮的VB脚本。我已经看到了this等提交表单的答案。我不希望这样，因为我需要点击带有脚本的按钮，以便点击按钮的常用工作流程。

顺便说一下，我正在使用GWT和SmartClient，这使得它变得更加复杂，因为ID会被混淆。为了解决这个问题，我正在使用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

如何使用VB单击网页中的按钮？

1 个答案: