Go

Forward by Attaching the Existing Email to a New Email

See more Email Object Examples

Demonstrates how to forward an email by attaching the email to a new email.

This example reads an email from an IMAP server, attaches the email to a new email, and sends the new email.

Go

    success := false

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    // Read the 1st (most recent) email in an Inbox.
    imap := chilkat.NewImap()

    // Connect to an IMAP server.
    imap.SetSsl(true)
    imap.SetPort(993)
    success = imap.Connect("imap.example.com")
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    // Login
    success = imap.Login("myLogin","myPassword")
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    // Select an IMAP mailbox
    success = imap.SelectMailbox("Inbox")
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        return
    }

    numEmails := imap.NumMessages()

    // Fetch the email at the last sequence number.
    // (We are assuming the Inbox has at least 1 email)

    email := chilkat.NewEmail()
    success = imap.FetchEmail(false,numEmails,false,email)
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        email.DisposeEmail()
        return
    }

    // Disconnect from the IMAP server.
    imap.Disconnect()

    fmt.Println(email.Subject())

    // Create a new email.  The email we just read will be attached to this email.
    eForward := chilkat.NewEmail()

    eForward.AddTo("Joe","joe@example.com")

    eForward.SetFromAddress("matt@somewhere.com")
    eForward.SetFromName("Matt")
    eForward.SetSubject("This is an email with another email attached.")

    eForward.SetHtmlBody("<p>Hello, this is an email I'm forwarding to you.  See the attached email.</p>")

    // Attach the email.
    eForward.AttachEmail(email)

    // We could save the .eml, then double-click on it to view in our mail program, such as Outlook or Thunderbird..
    eForward.SaveEml("qa_output/forward.eml")

    // We could send (forward) the email..
    mailman := chilkat.NewMailMan()

    mailman.SetSmtpHost("smtp.example.com")
    mailman.SetSmtpUsername("myLogin")
    mailman.SetSmtpPassword("myPassword")
    mailman.SetSmtpPort(587)
    mailman.SetStartTLS(true)

    success = mailman.SendEmail(eForward)
    if success == false {
        fmt.Println(mailman.LastErrorText())
        imap.DisposeImap()
        email.DisposeEmail()
        eForward.DisposeEmail()
        mailman.DisposeMailMan()
        return
    }

    success = mailman.CloseSmtpConnection()
    if success != true {
        fmt.Println("Connection to SMTP server not closed cleanly.")
    }

    fmt.Println("Mail Sent!")

    imap.DisposeImap()
    email.DisposeEmail()
    eForward.DisposeEmail()
    mailman.DisposeMailMan()