Visual FoxPro

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 FoxPro Downloads

Download Chilkat for Visual FoxPro

Visual FoxPro

LOCAL lnSuccess
LOCAL loBd
LOCAL loMime

lnSuccess = 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.
loBd = CreateObject('Chilkat.BinData')
lnSuccess = loBd.LoadFile("qa_data/photo.jpg")
IF (lnSuccess = 0) THEN
    ? loBd.LastErrorText
    RELEASE loBd
    CANCEL
ENDIF

loMime = CreateObject('Chilkat.Mime')

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

lnSuccess = loMime.SetBodyBd(loBd)
IF (lnSuccess = 0) THEN
    ? loMime.LastErrorText
    RELEASE loBd
    RELEASE loMime
    CANCEL
ENDIF

? "Body set from " + STR(loBd.NumBytes) + " bytes."

RELEASE loBd
RELEASE loMime