Sample code for 30+ languages & platforms
PureBasic

MIME SetBody

See more MIME Examples

Set the body text of a MIME message via the SetBody method.

Chilkat PureBasic Downloads

PureBasic
IncludeFile "CkMime.pb"

Procedure ChilkatExample()

    success.i = 0

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

    mime.i = CkMime::ckCreate()
    If mime.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    ; Add a few header fields:
    success = CkMime::ckAddHeaderField(mime,"Content-Type","text/plain")
    success = CkMime::ckAddHeaderField(mime,"Subject","this is a test")

    ; Set the body text content via SetBody.
    ; (Other methods such as SetBodyFromPlainText, or SetBodyFromFile
    ; will also automatically set the Content-Type header based
    ; on the type of content.  The SetBody method does not
    ; alter the MIME header.)
    CkMime::ckSetBody(mime,"This is the body text...")

    Debug CkMime::ckGetMime(mime)

    ; The MIME should look like this:

    ; Content-Type: text/plain
    ; Subject: this is a test
    ; 
    ; This is the body text...


    CkMime::ckDispose(mime)


    ProcedureReturn
EndProcedure