VBA - 如何在没有onclick属性的情况下单击IE中的按钮

时间:2018-04-06 08:19:53

标签: javascript html vba excel-vba excel

我想创建一个在特定网站上执行某些自动操作的宏。 在网络上,我发现了很多关于在IE中单击按钮的主题,但我没有遇到我遇到的问题。

我在网站上有以下HTML代码:

<a tabindex="0" class="x-btn-default-small" id="button-1028" role="button" aria-disabled="false" aria-hidden="false" hidefocus="on" unselectable="on" data-componentid="button-2018" data-qtip="Login">

在此属性中,我还有一个span属性,代码为:

<span class="x-btn-icon" id="button-1028-btnIconEl" role="presentation" data-ref="btnIconEl" unselectable="on" qa="btnIcon-loginButton"><span>

我的问题是我不知道如何点击此按钮。因为我的html代码中没有任何'onclick'属性。我希望可以单击此按钮,但我不知道该怎么做。 我尝试在VBA中使用以下代码:

Set links = wwwIE.Document.getElementsByTagName("a")   
Dim n, m
n = links.Length
for m = 0 To n - 1
     If links(m).ID = "button-1028" Then
         links(m).Click
         links(m).onclick = True
         links(m).FireEvent ("onclick")
         links(m).FireEvent ("onchange")
         links(m).FireEvent ("onblur")
         links(m).parentElement.Click
     End If
Next m

但没有任何作用。

0 个答案:

没有答案
相关问题