VBA自动化获取不到innerText(innerHTML,value)

Question

所以，我得到了很多次内文。这一次，它根本不起作用。尝试了很多替代方案。

首先我在 VBA 上使用 Selenium 来使用 chromedriver。源网站是“[ http://www.fazenda.df.gov.br/area.cfm?id_area=1536]” 该网站在 Iframe 上运行。在尝试从中获取内部文本半小时后，我认为其代码中的链接也能正常工作:“[ http://publica.agnet.fazenda.df.gov.br/FichaImovel/#/FichaCadastral]”。最后一个似乎在某种叫做“Angular”的东西上运行。

带有我需要的内部文本的菜单是一个下拉菜单。作为虚拟值，您可以使用 50868748。它生成的下拉文本由 15 行和一个表格组成。我需要的信息位于第 15 行“Nome do Responsável”或表格第 2 行第 2 列中。

我设法放置了代码并生成了下拉列表，但我无法获取内部文本。

这是我的代码:

Dim iptu As String

Dim 驱动程序作为新的 ChromeDriver

With driver


.Start 
iptu = 50868748 'dummy
.Get "http://publica.agnet.fazenda.df.gov.br/FichaImovel/#/FichaCadastral"

.FindElementById("inscricaoImovel").Clear
.FindElementById("inscricaoImovel").SendKeys iptu
.FindElementsById("btnCadastro")(2).Click

.Wait (300)

'到这里，一切正常

Dim label As Object
Dim name As String


Set label = .FindElementsByClass("ng-binding")(91)
'as you can see, i end up using this class(91) to get the value on the table, but i can get from the 15th line too


name = label.getAttribute("innerText") 'Error is here

'我试过 .innerText、.innerHTML 和其他。错误始终是“对象不接受属性或方法”错误 438。

end with

chrome 驱动程序是最新的。此外，页面源不包含我需要的信息。

谁能帮帮我？

Answer 1

要获取元素的InnerText，需要调用Text方法

Set label = .FindElementsByClass("ng-binding")(91)

name = label.Text

要获取内部 Html，

name = label.Attribute("innerHTML")