Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(MFC) Copy Email from one IMAP Account to AnotherDemonstrates how to copy the email in a mailbox from one account to another.
#include <CkImap.h> #include <CkMessageSet.h> #include <CkFileAccess.h> #include <CkStringBuilder.h> void ChilkatSample(void) { CkString strOut; CkImap imapSrc; // This example assumes Chilkat Imap to have been previously unlocked. // See Unlock Imap for sample code. // Connect to our source IMAP server. imapSrc.put_Ssl(true); imapSrc.put_Port(993); bool success = imapSrc.Connect("MY-IMAP-DOMAIN"); if (success != true) { strOut.append(imapSrc.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Login to the source IMAP server success = imapSrc.Login("MY-IMAP-LOGIN","MY-IMAP-PASSWORD"); if (success != true) { strOut.append(imapSrc.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } CkImap imapDest; // Connect to our destination IMAP server. imapDest.put_Ssl(true); imapDest.put_Port(993); success = imapDest.Connect("MY-IMAP-DOMAIN2"); if (success != true) { strOut.append(imapDest.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Login to the destination IMAP server success = imapDest.Login("MY-IMAP-LOGIN2","MY-IMAP-PASSWORD2"); if (success != true) { strOut.append(imapDest.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Select a source IMAP mailbox on the source IMAP server success = imapSrc.SelectMailbox("Inbox"); if (success != true) { strOut.append(imapSrc.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } bool fetchUids = true; // Get the set of UIDs for all emails on the source server. CkMessageSet *mset = imapSrc.Search("ALL",fetchUids); if (imapSrc.get_LastMethodSuccess() != true) { strOut.append(imapSrc.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Load the complete set of UIDs that were previously copied. // We dont' want to copy any of these to the destination. CkFileAccess fac; CkMessageSet msetAlreadyCopied; const char *strMsgSet = fac.readEntireTextFile("qa_cache/saAlreadyLoaded.txt","utf-8"); if (fac.get_LastMethodSuccess() == true) { msetAlreadyCopied.FromCompactString(strMsgSet); } int numUids = mset->get_Count(); CkStringBuilder sbFlags; int i = 0; while (i < numUids) { // If this UID was not already copied... int uid = mset->GetId(i); if (!msetAlreadyCopied.ContainsId(uid)) { strOut.append("copying "); strOut.appendInt(uid); strOut.append("..."); strOut.append("\r\n"); // Get the flags. const char *flags = imapSrc.fetchFlags(uid,true); if (imapSrc.get_LastMethodSuccess() == false) { strOut.append(imapSrc.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } sbFlags.SetString(flags); // Get the MIME of this email from the source. const char *mimeStr = imapSrc.fetchSingleAsMime(uid,true); if (imapSrc.get_LastMethodSuccess() == false) { strOut.append(imapSrc.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } bool seen = sbFlags.Contains("\\Seen",false); bool flagged = sbFlags.Contains("\\Flagged",false); bool answered = sbFlags.Contains("\\Answered",false); bool draft = sbFlags.Contains("\\Draft",false); success = imapDest.AppendMimeWithFlags("Inbox",mimeStr,seen,flagged,answered,draft); if (success != true) { strOut.append(imapDest.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Update msetAlreadyCopied with the uid just copied. msetAlreadyCopied.InsertId(uid); // Save at every iteration just in case there's a failure.. strMsgSet = msetAlreadyCopied.toCompactString(); fac.WriteEntireTextFile("qa_cache/saAlreadyLoaded.txt",strMsgSet,"utf-8",false); } i = i + 1; } delete mset; // Disconnect from the IMAP servers. success = imapSrc.Disconnect(); success = imapDest.Disconnect(); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); } |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.