使用VBA填充Zillow搜索框(Zillow是基于react的网站)

Question

我正在尝试确定搜索框的元素，以便可以将搜索框的值更改为地址。我可以用redfin和pellago来做这件事，但是zillow是用react编写的，我遇到了麻烦。

我已经尝试了"“中的几乎所有元素，当我检查元素时，我可以看到，但没有像我习惯的真正的"name”或"id“。

Sub WebscrapeZillow()

    Dim IE As New SHDocVw.InternetExplorer
    Set IE = New SHDocVw.InternetExplorer

    IE.Visible = True
    IE.navigate "https://zillow.com./"

    Do While IE.readyState <> READYSTATE_COMPLETE

    Loop

    IE.document.getElementById("__next").Value = "hello world"

End Sub

我每次都收到一条调试消息。我想在搜索框中输入一个地址。我不确定我是否“获得”了正确的元素类型或"“中的正确项。我尝试过大约25种不同的元素名称，所以"__next“是我最后一次尝试。我搜索了stackoverflow，但没有找到我认为是答案的东西(尽管我可能并不确切知道我在寻找什么)。谢谢你的帮助！

Answer 1

要查看DOM中的哪个类或id，您需要在浏览器中启动zillow。在chrome和更新版本的IE中，你可以点击F12，它将弹出一个开发人员面板，在那里你可以选择页面上的元素并查看它们的所有属性。

​

​

该搜索框有3个类，可以使用react-autosuggest__input、Input-sc-7nzn9k-0和dIKGyt，因此：

IE.document.getElementsByClassName("Input-sc-7nzn9k-0")(0).Value = "hello world"

我将该值放在(0)之后是因为getElementsByClassName返回一个与该类匹配的元素数组。这里我们只想要“第一个有这个类的元素”，所以(0)在这里工作，因为在那个页面上只有一个元素有那个特定的类。