Visual Basic 6.0

Load XML Object from HTTP Response Body

Demonstrates how to load the HTTP response body directly into an XML object. Visual Basic 6.0

Dim success As Long
success = 0

Dim http As New ChilkatHttp

Dim resp As New ChilkatHttpResponse
success = http.HttpStr("GET","https://www.chilkatsoft.com/exampledata/inventory.xml","","","",resp)
If (success = 0) Then
    Debug.Print http.LastErrorText
    Exit Sub
End If

Dim xml As New ChilkatXml

' If we wish to transfer (instead of copy) the XML from the HttpResponse to the Xml, then add the keyword "TakeResponseBody" to UncommonOptions
' This could save memory for extremely large XML responses.
resp.UncommonOptions = "TakeResponseBody"

success = resp.GetBodyXml(xml)

Debug.Print xml.GetXml()

' Note: If UncommonOptions contained "TakeResponseBody", then the response BodyStr will now be empty:
Debug.Print "----"
Debug.Print resp.BodyStr