DataFlex

Save a Single Email Attachment to Disk

Demonstrates the Chilkat Email.SaveAttachedFile method, which saves the attachment at a given zero-based index to a directory. If the directory or any of its components do not exist, Chilkat creates them. This example adds an attachment and saves it.

Background: Where SaveAllAttachments writes every attachment at once, SaveAttachedFile saves just one by index — useful when you have inspected the attachments (by type, name, or size) and want to extract only a specific file. The attachment keeps its own filename; the same filename-safety considerations apply as when saving all of them.

Chilkat DataFlex Downloads

Download Chilkat for DataFlex

DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoEmail
    String sTemp1

    Move False To iSuccess

    //  Demonstrates the SaveAttachedFile method, which saves the attachment at a given
    //  zero-based index to a directory.  If the directory (or any of its components) does not
    //  exist, Chilkat creates it.

    Get Create (RefClass(cComChilkatEmail)) To hoEmail
    If (Not(IsComObjectCreated(hoEmail))) Begin
        Send CreateComObject of hoEmail
    End
    Set ComSubject Of hoEmail To "Save one attachment"

    Get ComAddStringAttachment Of hoEmail "report.txt" "Attachment content." To iSuccess

    //  Save the attachment at index 0 into the specified directory.
    Get ComSaveAttachedFile Of hoEmail 0 "qa_output/attachments" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoEmail To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Showln "Saved attachment 0."

    //  Note: The path "qa_output/..." is a relative local filesystem path,
    //  relative to the current working directory of the running application.


End_Procedure