Classic ASP
Classic ASP
Attach Email as message/rfc822 sub-part to an Email
See more Email Object Examples
Demonstrates how to add attach a message/rfc822 email to another email.Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
' In this example, we'll attach an email loaded from a .eml file to a new email.
set fac = Server.CreateObject("Chilkat.FileAccess")
emlBytes = fac.ReadEntireFile("qa_data/eml/simple.eml")
set email = Server.CreateObject("Chilkat.Email")
email.Subject = "This is a test email with an attached email."
email.Body = "Test with attached email."
success = email.AddTo("Joe","joe@example.com")
email.From = "mary@example.com"
success = email.AttachMessage(emlBytes)
Response.Write "<pre>" & Server.HTMLEncode( email.GetMime()) & "</pre>"
' ----------------------------------------------------------------------
' Alternatively, we could do this:
set emailToBeAttached = Server.CreateObject("Chilkat.Email")
success = emailToBeAttached.LoadEml("qa_data/eml/simple.eml")
set email2 = Server.CreateObject("Chilkat.Email")
email2.Subject = "This is a test email with an attached email."
email2.Body = "Test with attached email."
success = email2.AddTo("Joe","joe@example.com")
email2.From = "mary@example.com"
emlBytes2 = emailToBeAttached.GetMimeBinary()
success = email2.AttachMessage(emlBytes2)
Response.Write "<pre>" & Server.HTMLEncode( "----") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( email2.GetMime()) & "</pre>"
%>
</body>
</html>