(Tcl) Transition from MailMan.LoadMime to Email.SetFromMimeText
Provides instructions for replacing deprecated LoadMime method calls with Email.SetFromMimeText. Note: This example requires Chilkat v11.0.0 or greater.
load ./chilkat.dll
set mailman [new_CkMailMan]
# ...
# ...
set mimeText "...."
# ------------------------------------------------------------------------
# The LoadMime method is deprecated:
# emailObj is a CkEmail
set emailObj [CkMailMan_LoadMime $mailman $mimeText]
if {[CkMailMan_get_LastMethodSuccess $mailman] == 0} then {
puts [CkMailMan_lastErrorText $mailman]
delete_CkMailMan $mailman
exit
}
# ...
# ...
delete_CkEmail $emailObj
# ------------------------------------------------------------------------
# Do the equivalent using Email.SetFromMimeText.
set email [new_CkEmail]
set success [CkEmail_SetFromMimeText $email $mimeText]
if {$success == 0} then {
puts [CkEmail_lastErrorText $email]
delete_CkMailMan $mailman
delete_CkEmail $email
exit
}
delete_CkMailMan $mailman
delete_CkEmail $email
|