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

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

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-9.5.0-win32.pkg

Procedure Test
    Handle hoEmail
    Boolean iSuccess
    String sTemp1

    // An email can have any number of To, CC, or Bcc recipients.
    Get Create (RefClass(cComChilkatEmail)) To hoEmail
    If (Not(IsComObjectCreated(hoEmail))) Begin
        Send CreateComObject of hoEmail
    End

    // 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.
    Get ComAddTo Of hoEmail "Chilkat Support" "support@chilkatsoft.com" To iSuccess
    Get ComAddTo Of hoEmail "Person 1" "person1@chilkatsoft.com" To iSuccess
    Get ComAddTo Of hoEmail "Person 2" "person2@chilkatsoft.com" To iSuccess
    Get ComAddTo Of hoEmail "Person 3" "person3@chilkatsoft.com" To iSuccess

    // This email now has 4 "To" recipients.

    // Now add some CC recipients:
    // Note: the friendly name may be empty if desired...
    Get ComAddCC Of hoEmail "Person 4" "person4@chilkatsoft.com" To iSuccess
    Get ComAddCC Of hoEmail "" "person5@chilkatsoft.com" To iSuccess
    Get ComAddCC Of hoEmail "Person 6" "person6@chilkatsoft.com" To iSuccess

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

    // Now add some Bcc recipients:
    Get ComAddBcc Of hoEmail "" "person7@chilkatsoft.com" To iSuccess
    Get ComAddBcc Of hoEmail "Person 8" "person8@chilkatsoft.com" To iSuccess

    // Clear all recipients via ClearTo, ClearCC, and ClearBcc:
    Send ComClearTo To hoEmail
    Send ComClearCC To hoEmail
    Send ComClearBcc To hoEmail

    // 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:

    Get ComAddMultipleTo Of hoEmail "Chilkat Support <support@chilkatsoft.com>, Person 1 <person1@chilkatsoft.com>, Person 2 <person2@chilkatsoft.com>, Person 3 <person3@chilkatsoft.com>" To iSuccess

    Get ComAddMultipleCC Of hoEmail "Person 4 <person4@chilkatsoft.com>, person5@chilkatsoft.com, Person 6 <person6@chilkatsoft.com>" To iSuccess

    Get ComAddMultipleBcc Of hoEmail "person7@chilkatsoft.com, Person 8 <person8@chilkatsoft.com>" To iSuccess

    Set ComBody Of hoEmail To "this is a test"
    Set ComSubject Of hoEmail To "this is a test"

    // Display the MIME:
    Get ComGetMime Of hoEmail To sTemp1
    Showln sTemp1


End_Procedure