Still playing with my TechHelp Database. I had come across an article, and it started me thinking. Right now, I use a get statement for each item that I want data for, such as Title, Description, Transcript, Keywords...
After reading the article, I thought, why not pull the data once and then search through that data for what I need. So I came up with the following routine to "GET" the page once and save it to a textbox on a form.

Details

Public Function Get599Section(BlogID As Long) As String
    Dim Http As Object
    Dim HTML As String
    Dim StartPos As Long
    Dim EndPos As Long
    Dim FindText As String

    Set Http = CreateObject("MSXML2.ServerXMLHTTP.6.0")

    Http.Open "GET", _
        "https://599cd.com/blog/display-article.asp?ID=" & BlogID, _
        False

    Http.SEnd

    HTML = Http.ResponseText
    
    StartPos = InStr(HTML, "<details><summary>")

    If StartPos = 0 Then Exit Function

    EndPos = InStr(StartPos, HTML, "</span>")

    If EndPos = 0 Then Exit Function

    HTML = Mid$(HTML, StartPos, EndPos - StartPos)
    
    Forms!GetTechHelpF.ResponseText = HTML
    
End Function
Copy

After trying this 6 or seven times, I got blocked from Richard's site (and rightfully so after Richard showed me what was happing.) Does anything pop out to you guys? Last thing I did not receive any errors running this, plus nothing in my textbox on the form.