使用selenium VBA单击每个View Contact选项卡的VBA代码

Posted 2021-03-30

在网页中有10个具有相同名称的查看联系人选项卡（查看联系人）。我正在尝试使用selenium VBA单击每个查看联系人选项卡但我只能使用以下Selenium VBA代码单击第一个查看联系人但Internet Explorer代码正常工作很好，但我想使用selenium v​​ba代码单击每个选项卡。

我的Selenium VBA代码： -

Dim ele As WebElement
For Each ele In driver.FindElementsByXPath("//input[@value='View Contact']")
ele.Click
Next

我的Internet Explorer代码： -

With ie.document
Set elems = .getElementsByTagName("input")
For Each e In elems
       If (e.getAttribute("value") = "View Contact") Then
           e.Click
           'Exit For
       End If
    Next e
End With

我的html代码： - 所有10个标签都有相同的HTML代码

<input type="button" class="boxOpener btn blue b" style="width: 150px;font-size: 14px;" value="View Contact">

答案

要通过View Contact点击每个Selenium，您可以使用以下代码块：

Dim ele As WebElement
For Each ele In driver.FindElementsByXPath("//input[@class='boxOpener btn blue b' and @value='View Contact']")
    ele.Click
Next ele

另一答案

你试过这样的：

Dim elem as Object
For Each elem In IE.document.getElementsByTagName("input")
    If InStr(elem.Value, "View Contact") > 0 Then elem.Click: Exit For
Next elem