vba - 中等完整性 IE 上的 VBA Web 抓取 - 运行时错误“438”对象不支持此属性或方法

Question

我想抓取一个 Intranet 应用程序，并且我想从下拉菜单中选择一个项目。

我读到我必须打开一个中等完整性级别的 Internet Explorer 实例才能访问 Intranet 站点。

这是我迄今为止尝试过的：

'Open up medium IL IE
Dim appIE As Object
    Set appIE = GetObject("new:{D5E8041D-920F-45e9-B8FB-B1DEB82C6E5E}")

With appIE
    .Navigate2 "https://gbs.nam.nsroot.net/GBS/cis.jsp"
    .Visible = True
End With

Do While appIE.Busy
    DoEvents
Loop

Set Title = appIE.document.getElementsByClassName(" oraDefault ")(1)
Title.Value = "2001"

但是，当代码尝试执行 getElementsByClassName 时出现运行时错误，我不完全确定发生了什么或它是如何工作的。

标签： vba