Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Go) Forward an Email using CreateForwardReads an email from an IMAP server, creates a forward version of the email using the CreateForward method, and sends the email to another recipient.
// 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.someMailServer.com") if success != true { fmt.Println(imap.LastErrorText()) imap.DisposeImap() return } // Login success = imap.Login("myLogin","myPassword") if success != true { fmt.Println(imap.LastErrorText()) imap.DisposeImap() return } // Select an IMAP mailbox success = imap.SelectMailbox("Inbox") if success != true { 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 := imap.FetchSingle(numEmails,false) if imap.LastMethodSuccess() == false { fmt.Println(imap.LastErrorText()) imap.DisposeImap() return } // Disconnect from the IMAP server. imap.Disconnect() fmt.Println(email.Subject()) eForward := email.CreateForward() // The eForward email has no To or CC recipients yet. // Add one or more.. eForward.AddTo("Chilkat Support","support@chilkatsoft.com") // We also need to specify the From name/address. eForward.SetFromAddress("matt@someMailServer.com") eForward.SetFromName("Matt") // If we wish to add text at the start of the email body: sbHtmlBody := chilkat.NewStringBuilder() if eForward.HasHtmlBody() == true { sbHtmlBody.Append(*eForward.GetHtmlBody()) sbHtmlBody.Prepend("<p>Hello, this is an email I'm forwarding to you...</p>") eForward.SetHtmlBody(*sbHtmlBody.GetAsString()) } sbPtBody := chilkat.NewStringBuilder() if eForward.HasPlainTextBody() == true { sbPtBody.Append(*eForward.GetPlainTextBody()) sbPtBody.Prepend("Hello, this is an email I'm forwarding to you...\r\n\r\n") eForward.SetTextBody(*sbPtBody.GetAsString(),"text/plain") } // 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.someMailServer.com") mailman.SetSmtpUsername("myLogin") mailman.SetSmtpPassword("myPassword") mailman.SetSmtpPort(587) mailman.SetStartTLS(true) success = mailman.SendEmail(eForward) if success != true { fmt.Println(mailman.LastErrorText()) imap.DisposeImap() sbHtmlBody.DisposeStringBuilder() sbPtBody.DisposeStringBuilder() mailman.DisposeMailMan() return } success = mailman.CloseSmtpConnection() if success != true { fmt.Println("Connection to SMTP server not closed cleanly.") } fmt.Println("Mail Sent!") eForward.DisposeEmail() email.DisposeEmail() imap.DisposeImap() sbHtmlBody.DisposeStringBuilder() sbPtBody.DisposeStringBuilder() mailman.DisposeMailMan() |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.