(Tcl) Email Recipients - AddTo, AddCC, AddBcc, AddMultipleTo, AddMultipleCC, AddMultipleBcc

This example demonstrates the usage of AddTo, AddCC, AddBcc, AddMultipleTo, AddMultipleCC, and AddMultipleBcc.

Chilkat Tcl Extension Downloads Chilkat Tcl Extension Downloads

load ./chilkat.dll

# An email can have any number of To, CC, or Bcc recipients.
set email [new_CkEmail]

# One recipient per AddTo, AddCC, or AddBcc call may be added:
# The 1st argument is the friendly name, the 2nd argument
# is the email address.
set success [CkEmail_AddTo $email "Chilkat Support" "support@chilkatsoft.com"]
set success [CkEmail_AddTo $email "Person 1" "person1@chilkatsoft.com"]
set success [CkEmail_AddTo $email "Person 2" "person2@chilkatsoft.com"]
set success [CkEmail_AddTo $email "Person 3" "person3@chilkatsoft.com"]

# This email now has 4 "To" recipients.

# Now add some CC recipients:
# Note: the friendly name may be empty if desired...
set success [CkEmail_AddCC $email "Person 4" "person4@chilkatsoft.com"]
set success [CkEmail_AddCC $email "" "person5@chilkatsoft.com"]
set success [CkEmail_AddCC $email "Person 6" "person6@chilkatsoft.com"]

# Now the email has 7 total recipients (3 "To" and 4 "CC")

# Now add some Bcc recipients:
set success [CkEmail_AddBcc $email "" "person7@chilkatsoft.com"]
set success [CkEmail_AddBcc $email "Person 8" "person8@chilkatsoft.com"]

# Clear all recipients via ClearTo, ClearCC, and ClearBcc:
CkEmail_ClearTo $email
CkEmail_ClearCC $email
CkEmail_ClearBcc $email

# The email is now back to 0 recipients...

# Add recipients just as before, but this time use
# AddMultipleTo, AddMultipleCC, and AddMultipleBcc.
# These methods accept a comma-separated list of 
# email addresses.  For example:

set success [CkEmail_AddMultipleTo $email "Chilkat Support <support@chilkatsoft.com>, Person 1 <person1@chilkatsoft.com>, Person 2 <person2@chilkatsoft.com>, Person 3 <person3@chilkatsoft.com>"]

set success [CkEmail_AddMultipleCC $email "Person 4 <person4@chilkatsoft.com>, person5@chilkatsoft.com, Person 6 <person6@chilkatsoft.com>"]

set success [CkEmail_AddMultipleBcc $email "person7@chilkatsoft.com, Person 8 <person8@chilkatsoft.com>"]

CkEmail_put_Body $email "this is a test"
CkEmail_put_Subject $email "this is a test"

# Display the MIME:
puts [CkEmail_getMime $email]

delete_CkEmail $email