我正在尝试从网页上抓取项目列表。设置响应文本后,当我在msgbox的oHtml.body.innerHTML中显示所有HTML内容时,该部分即可正常工作。但是,当实际查询文档以获取相关元素时,会出现错误。
我在Set dados ...
开头的行出现以下错误
运行时错误'91';
未设置对象变量或With块变量
这是我的代码:
Private Sub Scrape_schedule()
Dim oHtml As HTMLDocument
Dim oElement As Object
Set oHtml = New HTMLDocument
With CreateObject("MSXML2.XMLHTTP")
.Open "GET", "https://example.com", False
.Send
oHtml.body.innerHTML = .responseText
End With
MsgBox oHtml.body.innerHTML
Set dados = oHtml.getElementsByClassName("resolutionWidget-state-list")(0).getElementsByTagName("li")
End Sub
答案 0 :(得分:0)
没有单数npm install --save react
。函数react-router
会返回集合,就像.getElementsByTagName("li")
一样。您需要指定索引号或遍历集合以收集所有索引。
.getElementsByTagName