Visual Basic 6.0

Set a MIME Body from Binary Bytes (BinData)

Demonstrates the Chilkat Mime.SetBodyBd method, which sets the decoded body bytes from a BinData, changes the transfer encoding to base64, and preserves the bytes exactly. The only argument is the BinData.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: This is the direct way to put arbitrary binary content into a part from memory — a generated image, a decrypted blob — without a temporary file. Chilkat base64-encodes it so the bytes survive text-based transports unchanged. Note it does not set a Content-Type or disposition, so assign those yourself to describe what the bytes are.

Chilkat Visual Basic 6.0 Downloads

Download Chilkat for Visual Basic 6.0

Visual Basic 6.0

Dim success As Long
success = 0

'  Demonstrates the Mime.SetBodyBd method, which sets the decoded body bytes from a BinData,
'  changes the transfer encoding to base64, and preserves the bytes exactly.  The only argument is
'  the BinData.

'  Put the binary body bytes into a BinData.
Dim bd As New ChilkatBinData
success = bd.LoadFile("qa_data/photo.jpg")
If (success = 0) Then
    Debug.Print bd.LastErrorText
    Exit Sub
End If

Dim mime As New ChilkatMime

'  Set a Content-Type for the binary content (SetBodyBd does not set one itself).
mime.ContentType = "image/jpeg"

success = mime.SetBodyBd(bd)
If (success = 0) Then
    Debug.Print mime.LastErrorText
    Exit Sub
End If

Debug.Print "Body set from " & bd.NumBytes & " bytes."