ACCESS VBAでIEを使用せずにスクレイピングしていますが、ClassNameの取得が出来ません

Question

競艇のオフィシャルサイトからIEを使用せずにスクレイピングしています。
TagNameの取得は上手く行くのですが
ClassNameの取得をしようとすると実行時エラー'438
「オブジェクトはこのプロパティまたはメソッドをサポートしていません」
が出てしまい取得できません。

同一の命令をエクセルで動かすと問題ないのですが、ACCESSでは上手く行きません。色々と調べて見たのですが、解決策が見つからず困っております。どなたかお詳しい方がいらっしゃいましたら、教えて頂けると大変助かります。宜しくお願い致します。

以下にコード記載致します。

Sub Sample()

Dim req As WinHttp.WinHttpRequest: Set req = New WinHttp.WinHttpRequest
Dim DY As String
DY = "20220824"
Dim strSearch As String

Dim url As String: url = "https://www.boatrace.jp/owpc/pc/race/index?hd=" & DY & ""
req.Open "GET", url
req.Send

If req.Status <> 200 Then
MsgBox "レスポンスエラー"
Exit Sub
End If

Dim html As Object: Set html = New HTMLDocument
html.write req.ResponseText
Dim objITEM As HTMLAnchorElement
DoEvents

'ここで上手く動作しません
For Each objITEM In html.getElementsByClassName("textLinks3").Item(0)

strSearch = objITEM.innerText

Debug.Print strSearch

Exit For

Next

End Sub

Answer 1

I loaded that page, switched to English, and got the View Source. I searched for "textLinks3" and it is not there.