|
Chilkat • HOME • ASP • Visual Basic • VB.NET • C# • Visual C++ • C • MFC • Delphi • FoxPro • Java • Perl • PHP • Python • Ruby • SQL Server • VBScript
|
Replace Attachments with a Single Zip File VB.NET code demonstrating how to add file attachments and then Zip them so that a single Zip file attachment is sent with the email. This only requires Chilkat Mail, and not Chilkat Zip. Dim success As Boolean
' Create a mailman object for sending email.
Dim mailman As New Chilkat.MailMan()
' Any string argument automatically begins the 30-day trial.
mailman.UnlockComponent("30-day trial")
' Set the SMTP server host.
mailman.SmtpHost = "smtp.earthlink.net"
' Create a simple email with a Zip file attachment.
Dim email As New Chilkat.Email()
' This email will have both a plain-text body and an HTML body.
email.Body = "This is the plain-text alternative"
email.AddHtmlAlternativeBody("<html><body><b><font color='red' size='+1'>This is bold red text.</font></b></html>")
email.Subject = "This email has a file attachment."
email.AddTo("Chilkat Support", "support@chilkatsoft.com")
email.From = "Hello World <hello@chilkatsoft.com>"
' Add a file attachment.
Dim contentType As String
' Returns the content-type of the attachment (determined by the file extension)
' This return value is for informational purposes only.
contentType = email.AddFileAttachment("dude.gif")
If contentType Is Nothing Then
MessageBox.Show(email.LastErrorText)
Return
End If
' Add another file attachment.
contentType = email.AddFileAttachment("dude2.gif")
If contentType Is Nothing Then
MessageBox.Show(email.LastErrorText)
Return
End If
' Replace the attachments with a single Zip archive that contains the files already attached.
email.ZipAttachments("dudes.zip")
' Send email, the recipient will receive an email with a single attachment (dudes.zip)
' that contains 2 file: dude.gif and dude2.gif.
success = mailman.SendEmail(email)
If success Then
MessageBox.Show("Sent mail with Zip attachment!")
Else
MessageBox.Show(mailman.LastErrorText)
End If
Important: The download for this
example does not contain the ChilkatDotNet.dll which |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2007 Chilkat Software, Inc. All Rights Reserved.