Classic ASP

Attach an Email to Another Email

Demonstrates the Chilkat Email.AttachEmail method, which attaches a copy of another email to this email object. The attached email is encapsulated in a message/rfc822 subpart. Because a copy is attached, later changes to the source email do not affect the embedded message. This example attaches one email to another.

Background: "Forward as attachment" produces exactly this structure: the original message is embedded whole as a message/rfc822 part rather than quoted into the body. This preserves the original's headers and formatting intact, which matters for forwarding to a mailbox that will re-parse it, or for reporting spam/phishing with the original evidence attached. Such parts are counted by NumAttachedMessages.

Chilkat Classic ASP Downloads

Download Chilkat for Classic ASP

Classic ASP

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

'  Demonstrates the AttachEmail method, which attaches a copy of another email to this email
'  object.  The attached email is encapsulated in a message/rfc822 subpart.

set innerEmail = Server.CreateObject("Chilkat.Email")
innerEmail.Subject = "Original message"
innerEmail.From = "alice@example.com"
innerEmail.Body = "This is the original message being forwarded."

set email = Server.CreateObject("Chilkat.Email")
email.Subject = "FW: Original message"
email.From = "bob@example.com"
email.Body = "See the attached original email."

'  Attach a copy of the inner email as a message/rfc822 part.

success = email.AttachEmail(innerEmail)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( email.LastErrorText) & "</pre>"
    Response.End
End If

Response.Write "<pre>" & Server.HTMLEncode( "NumAttachedMessages = " & email.NumAttachedMessages) & "</pre>"

%>
</body>
</html>