|
Chilkat •
HOME •
Android™ •
ASP •
Visual Basic •
VB.NET •
C# •
iOS (IPhone) •
Objective-C •
C++ •
C •
MFC •
Delphi •
FoxPro •
Java •
Perl •
PHP Extension •
PHP ActiveX •
Python •
PowerShell •
Ruby •
SQL Server •
VBScript
Send HTML Mail with Embedded Image
VB.NET source code example showing how to send an HTML mail with images embedded within the HTML.
' Create a mailman object for sending email.
Dim mailman As New Chilkat.MailMan()
' Any string passed to UnlockComponent automatically begins a 30-day trial.
Dim success As Boolean
success = mailman.UnlockComponent("Hello World")
If (success <> true) Then
MsgBox(mailman.LastErrorText)
Exit Sub
End If
' Set the SMTP server.
mailman.SmtpHost = "smtp.earthlink.net"
' Create an email object
Dim email As New Chilkat.Email()
' Add an embedded image to the HTML email.
Dim cid As String = email.AddRelatedFile("dude.gif")
If cid Is Nothing Then
MessageBox.Show(email.LastErrorText)
Return
End If
' Update the HTML to reference the image using the CID
Dim htmlBody As String = "<html><body>Embedded Image:<br><img src=""cid:IMAGE_CID""></body></html>"
htmlBody = htmlBody.Replace("IMAGE_CID", cid)
' Set the basic email stuff: HTML body, subject, "from", "to"
email.SetHtmlBody(htmlBody)
email.Subject = "This is an HTML email with an embedded image."
email.AddTo("Chilkat Support", "support@chilkatsoft.com")
email.From = "Programmer <programmer@chilkatsoft.com>"
success = mailman.SendEmail(email)
If Not success Then
MessageBox.Show(mailman.LastErrorText)
Return
End If
|
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.
