Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Lianja) Rename Email Attachments After AddingDemonstrates how to rename email attachments after adding but before sending.
// This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. loMailman = createobject("CkMailMan") loMailman.SmtpHost = "smtp.my-mail-server.com" loMailman.SmtpUsername = "MY_SMTP_USERNAME" loMailman.SmtpPassword = "MY_SMTP_PASSWORD" loMailman.SmtpSsl = .T. loMailman.SmtpPort = 465 loEmail = createobject("CkEmail") loEmail.Subject = "This is a test" loEmail.Body = "This is a test" loEmail.From = "Chilkat Support <support@chilkatsoft.com>" llSuccess = loEmail.AddTo("Chilkat Admin","admin@chilkatsoft.com") // To add more recipients, call AddTo, AddCC, or AddBcc once per recipient. // Add some attachments. // The AddFileAttachment method returns the value of the content-type it chose for the attachment. lcContentType = loEmail.AddFileAttachment("qa_data/jpg/starfish.jpg") if (loEmail.LastMethodSuccess <> .T.) then ? loEmail.LastErrorText release loMailman release loEmail return endif lcContentType = loEmail.AddFileAttachment("qa_data/pdf/fishing.pdf") if (loEmail.LastMethodSuccess <> .T.) then ? loEmail.LastErrorText release loMailman release loEmail return endif // If we save the email to a .eml, we can examine in a text editor. llSuccess = loEmail.SaveEml("qa_output/e1.eml") if (llSuccess = .F.) then ? loEmail.LastErrorText ? "Failed to save .eml" release loMailman release loEmail return endif // We see the following in the e1.eml // Notice that Chilkat replaced the full path with just the filename. // The full local path is not part of the email that gets sent.. // ... // --------------020807050607070004010609 // Content-Type: image/jpeg; name="starfish.jpg" // Content-Transfer-Encoding: base64 // Content-Disposition: attachment; filename="starfish.jpg" // // ... // --------------020807050607070004010609 // Content-Type: application/pdf; name="fishing.pdf" // Content-Transfer-Encoding: base64 // Content-Disposition: attachment; filename="fishing.pdf" // ... // Before sending, each filename can be changed within the email object. // For example: llSuccess = loEmail.SetAttachmentFilename(0,"orange_starfish.jpg") llSuccess = loEmail.SetAttachmentFilename(1,"tuna_fishing.pdf") // Look at the new MIME source of the email in a text editor... llSuccess = loEmail.SaveEml("qa_output/e2.eml") if (llSuccess = .F.) then ? loEmail.LastErrorText ? "Failed to save .eml" release loMailman release loEmail return endif // You'll see this: // ... // --------------020807050607070004010609 // Content-Type: image/jpeg; name="orange_starfish.jpg" // Content-Transfer-Encoding: base64 // Content-Disposition: attachment; filename="orange_starfish.jpg" // // ... // --------------020807050607070004010609 // Content-Type: application/pdf; name="tuna_fishing.pdf" // Content-Transfer-Encoding: base64 // Content-Disposition: attachment; filename="tuna_fishing.pdf" // ... // Send the email with the updated filenames.. llSuccess = loMailman.SendEmail(loEmail) if (llSuccess <> .T.) then ? loMailman.LastErrorText release loMailman release loEmail return endif llSuccess = loMailman.CloseSmtpConnection() if (llSuccess <> .T.) then ? "Connection to SMTP server not closed cleanly." endif ? "Mail with attachments sent!" release loMailman release loEmail |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.