Lianja
Lianja
Create an Inline-Forward Email
See more Email Object Examples
Demonstrates the Chilkat Email.ToForward method, which creates an inline-forward email based on this email. The forward is returned in the argument, and the source email is not modified. The returned email can be edited — adding recipients, prepending a note — before sending. This example forwards a message and adds a recipient.
Background: An inline forward quotes the original message's content within the body of the new message — the familiar "---------- Forwarded message ----------" style — as opposed to attaching the original as a
message/rfc822 part (which AttachEmail does). Chilkat assembles the quoted body and headers for you, leaving the new message ready to address and send.Chilkat Lianja Downloads
llSuccess = .F.
// Demonstrates the ToForward method, which creates an inline-forward email based on this
// email. The forward is returned in the argument; the source email is not modified.
loEmail = createobject("CkEmail")
loEmail.Subject = "Quarterly results"
loEmail.From = "alice@example.com"
loEmail.AddTo("Bob","bob@example.com")
loEmail.Body = "Here are the quarterly results."
// Create an inline-forward email from this message.
loFwd = createobject("CkEmail")
llSuccess = loEmail.ToForward(loFwd)
if (llSuccess = .F.) then
? loEmail.LastErrorText
release loEmail
release loFwd
return
endif
// The forward can be edited to add recipients before sending.
loFwd.AddTo("Carol","carol@example.com")
? loFwd.GetMime()
release loEmail
release loFwd