Read HTML Source Code with VBA

[KevinJ]

Using VBA, I am trying to retrieve the contents of the Source of a web page (the same as would appear if you right-clicked on the page and chose "View Source") into a variable so I can work on it in VBA (using InStr, etc.).

The problem is I can use code such as
strHTMLText = ie.Document.body.innerText
or
strHTMLText = ie.Document.body.outerText
to retrieve the code, but in either case only part, not all, of the source code is captured. I need ALL the code. Is there some kind of code such as ie.Document.body.allText or similar that would perform this function?

Much obliged!

 

[dgpriest]

That solved it, ZVI and Xeequiel I can't thank you enough!

 

[jaredaseltzer]

Try this code and see result in Immediate window:

Sub Test()
  Const URL$ = "http://online.recoveryversion.org/bibleverses.asp?fvid=2901&lvid=2901"
  Const MASK$ = "href=FootNotes.asp?FNtsID="
  Dim txt As String, i As Long
  With CreateObject("MSXML2.XMLHTTP")
    .Open "GET", URL, False
    .Send
    txt = .ResponseText
  End With
  Do
    i = InStr(i + 1, txt, MASK)
    If i = 0 Then Exit Do
    Debug.Print Val(Mid$(txt, i + Len(MASK), 15))
  Loop
End Sub

This is a very helpful post!

But when I use it, it doesn't retain special characters. It converts them to question marks.

I'm trying to programmatically download hundreds of webpages like this one:

The Comprehensive Aramaic Lexicon

How do I need to change the code so that it retains the utf-8 characters?