Tcl

Set a MIME Body from Plain Text

Demonstrates the Chilkat Mime.SetBodyFromPlainText method, which sets the body as plain text. The only argument is the text. For ASCII input Chilkat uses text/plain with 7bit encoding; for non-ASCII it selects an appropriate charset and encoding.

Background: This is the simplest way to give a MIME entity a text body — Chilkat picks a sensible Content-Type and transfer encoding for you based on the content. Plain ASCII stays as 7bit with no charset, while text containing accented or non-Latin characters gets a charset (typically UTF-8) and a suitable encoding so it survives transmission intact. It is the text counterpart to SetBodyFromHtml and SetBodyFromXml.

Chilkat Tcl Downloads

Download Chilkat for Tcl

Tcl


load ./chilkat.dll

set success 0

#  Demonstrates the Mime.SetBodyFromPlainText method, which sets the body as plain text.  The only
#  argument is the text.  For ASCII, Chilkat sets Content-Type: text/plain and a 7bit transfer
#  encoding; for non-ASCII it selects an appropriate charset and encoding.

set mime [new_CkMime]

set success [CkMime_SetBodyFromPlainText $mime "Hello, this is a plain-text message body."]
if {$success == 0} then {
    puts [CkMime_lastErrorText $mime]
    delete_CkMime $mime
    exit
}

set mimeText [CkMime_getMime $mime]
if {[CkMime_get_LastMethodSuccess $mime] == 0} then {
    puts [CkMime_lastErrorText $mime]
    delete_CkMime $mime
    exit
}

puts "$mimeText"

delete_CkMime $mime