getElementsByClassName
is only defined on document
, not HTMLElement
. Instead use querySelectorAll
.
You should also use intermediate variables so you can inspect your program when debugging without having multiple calls on the same line and then not-knowing which specific call failed.
Like so:
Dim contentElement
Set contentElement = IE.GetElementById( "content" )
If contentElement = Nothing Then
MsgBox( "<div#content> not found" )
End If
Dim postTitles
Set postTitles = contentElement.QuerySelectorAll( ".post-title" )
Dim postTitle
For Each postTitle in postTitles
' do stuff
Next
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…