Vba 从 Li 获取数据的 selenium 代码 class

Question

我正在尝试从具有相同 Class 的 li 获取数据，下面是我尝试过但没有收到任何输出的代码。

不对的地方请指正

我的VBA代码：

Sub Class_Initialize()
Set driver = CreateObject("Selenium.FirefoxDriver")
driver.get "url"
driver.Window.Maximize
Dim dd As Variant
dd = driver.findElementsByClass("oas_columns ng-binding")(2).Text
Range("A" & Rows.Count).End(xlUp).Offset(1) = dd

'In column A i require output Abhay 28566207

dd = driver.findElementsByClass("oas_columns ng-binding")(3).Text
Range("B" & Rows.Count).End(xlUp).Offset(1) = dd

'In column B i require output Brick Field Shelters

dd = driver.findElementsByClass("oas_columns ng-binding")(4).Text
Range("C" & Rows.Count).End(xlUp).Offset(1) = dd

'In column C i require output 2018-02-12

End Sub

我的HTML代码：

<ul class="oas_columnsWrapper">
<li class="oas_columns ng-binding" ng-show="vm.data">1.</li>
<li class="oas_columns ng-binding">Abhay 28566207</li>
<li class="oas_columns ng-binding">Brick Field Shelters</li>
<li class="oas_columns ng-binding">2018-02-12</li>
<li class="oas_columns ng-binding">3,868</li>
<li class="oas_columns ng-binding">33</li>
<li class="oas_columns ng-binding">0.85%</li>
<li class="oas_columns semiBold active">ACTIVE</li>
<div class="oas_columns" ng-show="x['responseCount']"><a href="/do/my99acres/homepage/route/all_responses/ITOA-8157" ng-click="trackGA('Manage Listings', 'OnClick', 'ML_ShowResponse', '');" ui-sref="root.response({filter:'ITOA' + '-' + 8157})" ui-sref-opts="{reload:true}" class="ng-binding">4 Responses</a></div><li class="oas_columns oas_viewReportBtn" id="oas_viewReportBtn0" ng-click="vm.viewReport($index,$event);">View Report</li></ul>

Answer 1

要从 <li> 标签中获取文本，您可以使用以下 :

• Abhay 28566207 :

  dd = driver.FindElementByXPath("//ul[@class='oas_columnsWrapper']//following::li[2]").Text
  //or
  dd = driver.FindElementByXPath("//ul[@class='oas_columnsWrapper']//following::li[2]").Attribute("innerHTML") 
  

• Brick Field Shelters :

  dd = driver.FindElementByXPath("//ul[@class='oas_columnsWrapper']//following::li[3]").Text
  //or
  dd = driver.FindElementByXPath("//ul[@class='oas_columnsWrapper']//following::li[3]").Attribute("innerHTML")
  

• 2018-02-12 :

  dd = driver.FindElementByXPath("//ul[@class='oas_columnsWrapper']//following::li[4]".Text
  //or
  dd = driver.FindElementByXPath("//ul[@class='oas_columnsWrapper']//following::li[4]".Attribute("innerHTML")