PureBasic

Append Text to an Email Body

Demonstrates the Chilkat Email.AppendToBody method, which appends additional text to the email's existing plain-text body rather than replacing it. This example sets an initial body and then appends more text.

Background: Setting the body (via Body or SetTextBody) replaces whatever was there, while AppendToBody adds to it. That is convenient when a message body is assembled in pieces — for example a greeting, then dynamically generated lines, then a signature — without having to concatenate the whole string yourself before assigning it.

Chilkat PureBasic Downloads

Download Chilkat for PureBasic

PureBasic

IncludeFile "CkEmail.pb"

Procedure ChilkatExample()

    ;  Demonstrates the AppendToBody method, which appends additional text to the email's
    ;  existing plain-text body.

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

    CkEmail::setCkSubject(email, "AppendToBody example")

    ;  Set an initial body.
    CkEmail::ckSetTextBody(email,"First line.","text/plain")

    ;  Append more text to the existing body.
    CkEmail::ckAppendToBody(email," Appended text.")

    Debug "Body = " + CkEmail::ckBody(email)


    CkEmail::ckDispose(email)


    ProcedureReturn
EndProcedure