从Visual Basic 6在Webbrowser中调用DOM onmousedown事件

时间:2012-02-05 00:07:44

标签: dom browser vb6 dom-events ihtmldocument2

我将HTML文档加载到Visual Basic 6中的WebBrowser控件中。

有链接

<a href="something" onmousedown="return abc(this,'asd', 'AO',null,event)">

我想从VB

以编程方式调用onmousedown事件

我尝试了很多东西,包括

doc.getElementsByTagName("a")(i).InvokeMember("MouseDown")
doc.getElementsByTagName("a")(i).RaiseEvent("OnMouseDown")
doc.getElementsByTagName("a")(i).MouseDown

但似乎没有任何效果。

1 个答案:

答案 0 :(得分:0)

我自己没有尝试过这样做,但是这个vbcity帖子包含了一个描述和一些示例代码。向下滚动到主题第一页上的最后一篇文章。

http://vbcity.com/forums/t/37407.aspx

要将上述帖子简化为essentials,可以迭代表单集合的成员以找到随后单击的按钮。

With Me.WebBrowser1
    For n = 0 To .Document.Forms("formname").Length - 1
        If .Document.Forms("formname").Item(n).Value = "buttonvalue" Then
            .Document.Forms("formname").Item(n).Click
            Exit For
        End If
    Next n
End With

将'formname'和'buttonvalue'替换为适当的值