Visual Basic 6.0
Visual Basic 6.0
Add a Related File Addressed by Content-Location
See more Email Object Examples
Demonstrates the Chilkat Email.AddRelatedFile2 method, which adds a local file as a related MIME resource addressed by Content-Location rather than Content-ID. The second argument becomes the related item's MIME filename and Content-Location value, and it should match the filename, path, or URL already used by the corresponding HTML reference (such as an img element's src). This example embeds an image referenced as logo.png.
Background: There are two ways HTML email links to embedded resources. The
cid: approach (see AddRelatedFile) uses a generated Content-ID, while the Content-Location approach lets the HTML keep an ordinary-looking src="logo.png" and matches it to a part carrying the same Content-Location. The latter is handy when converting an existing web page to email, because the original relative URLs can stay unchanged.Chilkat Visual Basic 6.0 Downloads
Dim success As Long
success = 0
' Demonstrates the AddRelatedFile2 method, which adds a local file as a related MIME
' resource addressed by Content-Location rather than Content-ID. The 2nd argument becomes
' the item's MIME filename / Content-Location and should match the reference in the HTML.
Dim email As New ChilkatEmail
email.Subject = "Email with a related image (by Content-Location)"
' The HTML references the image by the same name used as the Content-Location.
email.SetHtmlBody "<html><body><img src=""logo.png""/></body></html>"
' Add the file as a related item addressed by Content-Location "logo.png".
success = email.AddRelatedFile2("qa_data/images/logo.png","logo.png")
If (success = 0) Then
Debug.Print email.LastErrorText
Exit Sub
End If
Debug.Print "NumRelatedItems = " & email.NumRelatedItems
' Note: The path "qa_data/images/logo.png" is a relative local filesystem path,
' relative to the current working directory of the running application.