EmailAttachment

From Xojo Documentation

Class (inherits from Object)

Used to hold attachments to an email.

Properties
ContentEncoding MIMEType
Data Name


Methods
LoadFromFile SaveToFile

Examples

The following example takes a path to a file and adds it as an email attachment. The path has been entered into the TextField named fileField.

Var mail As New EmailMessage
If fileField.Value <> "" Then
Var file As New EmailAttachment
file.LoadFromFile(GetFolderItem(fileField.Value))
mail.Attachments.Append(file)
End If

This code accounts for some different file types:

Var mail As New EmailMessage
Var file As FolderItem = FolderItem.ShowOpenFileDialog("")
If file <> Nil And file.Exists Then
Var attachment As New EmailAttachment
attachment.LoadFromFile(file)
attachment.Name = file.Name
If file.Name.Right(4) = ".pdf" Then
attachment.MIMEType = "application/pdf"
ElseIf file.Name.Right(4) = ".png" Then
attachment.MIMEType = "image/png"
ElseIf file.Name.Right(4) = ".jpg" Or attachment.Name.Right(5) = ".jpeg" Then
attachment.MIMEType = "image/jpeg"
// Else ' and so on with other extensions
End If
mail.Attachments.AddRow(attachment)
End If

See Also

EmailMessage, EmailHeaders, POP3Socket, POP3SecureSocket, SMTPSocket, SMTPSecureSocket, SocketCore, TCPSocket classes.