(Xojo Plugin) Example: Http.ResumeDownloadBd method

Demonstrates the ResumeDownloadBd method.

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

Dim success As Boolean
success = False

Dim http As New Chilkat.Http
http.KeepResponseBody = True

// To demonstrate resuming a download, we've created a file on the chilkatsoft.com
// web server that contains the first 82,379 bytes of the full  279,658 bytes of the hamlet.xml file.

// We'll first download the partial file, and pretend it was a previous incomplete attempt to download the entire file.
Dim bd As New Chilkat.BinData
success = http.DownloadBd("https://www.chilkatsoft.com/testData/hamlet_partial.xml",bd)
If (success = False) Then
    System.DebugLog(http.LastErrorText)
    Return
End If

// Download the remainder of hamlet.xml.
success = http.ResumeDownloadBd("https://www.chilkatsoft.com/testData/hamlet.xml",bd)
Dim statusCode As Int32
statusCode = http.LastStatus
If (success = False) Then
    If (statusCode = 0) Then
        // Unable to either send the request or get the response.
        System.DebugLog(http.LastErrorText)
    Else
        // We got a response, but the status code was not in the 200s
        System.DebugLog("Response status code: " + Str(statusCode))
        // Examine the response body.
        System.DebugLog("Response body:")
        System.DebugLog(http.LastResponseBody)
    End If

    System.DebugLog("Download failed.")

Else
    System.DebugLog("Download success, response status = " + Str(statusCode))
End If

// The hamlet.xml file should be 279,658 bytes
System.DebugLog("size of hamlet.xml: " + Str(bd.NumBytes))

System.DebugLog("Success.")