Sample code for 30+ languages & platforms
Visual FoxPro

Save a Single Email Attachment to Disk

See more Email Object Examples

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 Visual FoxPro Downloads

Visual FoxPro
LOCAL lnSuccess
LOCAL loEmail

lnSuccess = 0

*  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.

loEmail = CreateObject('Chilkat.Email')
loEmail.Subject = "Save one attachment"

loEmail.AddStringAttachment("report.txt","Attachment content.")

*  Save the attachment at index 0 into the specified directory.
lnSuccess = loEmail.SaveAttachedFile(0,"qa_output/attachments")
IF (lnSuccess = 0) THEN
    ? loEmail.LastErrorText
    RELEASE loEmail
    CANCEL
ENDIF

? "Saved attachment 0."

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

RELEASE loEmail