B4X

QuickGetBd Example

The QuickGetBd method is called to send a GET request to download a binary target, such as PDF, zip, image file, etc. into a Chilkat BinData object. B4X

Dim success As Boolean = False

'  This example assumes the Chilkat API to have been previously unlocked.
'  See Global Unlock Sample for sample code.

Dim http As ChilkatHttp
http.Initialize("http")
http.KeepResponseBody = True

Dim bd As ChilkatBinData
bd.Initialize

'  Download the contents of a PDF file into the bd object.
success = http.QuickGetBd("https://www.chilkatsoft.com/hello.pdf", bd)
If success = False Then
    '  This will happen if the response status code was 400 or greater,
    '  or if the request could not be sent, or if no response was received.
    '  
    '  In other words, success will only be True if bd contains the desired content at the URL (not an error response).
    Dim statusCode As Int = http.LastStatus
    Log("Response status: " & statusCode)

    If statusCode = 0 Then
        '  There was an error in communications.  
        Log(http.LastErrorText)
    Else
        '  We received a response status code indicating failure.
        '  Examine the response body.
        Log(http.LastResponseBody)
    End If


    Return
End If


'  Load the downloaded PDF into a Chilkat PDF object.
Dim pdf As ChilkatPdf
pdf.Initialize("pdf")
success = pdf.LoadBd(bd)
If success = False Then
    Log(pdf.LastErrorText)
    Return
End If


'  ...

Log("Success.")