(Chilkat2-Python) Copy Email from one IMAP Account to Another

Demonstrates how to copy the email in a mailbox from one account to another.

Chilkat2 Python Downloads install with pip pip3 install chilkat2 or download... Python Module for Windows, Linux, Alpine Linux, MacOS, Solaris

import sys
import chilkat2

imapSrc = chilkat2.Imap()

# This example assumes Chilkat Imap to have been previously unlocked.
# See Unlock Imap for sample code.

# Connect to our source IMAP server.
imapSrc.Ssl = True
imapSrc.Port = 993
success = imapSrc.Connect("MY-IMAP-DOMAIN")
if (success != True):
    print(imapSrc.LastErrorText)
    sys.exit()

# Login to the source IMAP server
success = imapSrc.Login("MY-IMAP-LOGIN","MY-IMAP-PASSWORD")
if (success != True):
    print(imapSrc.LastErrorText)
    sys.exit()

imapDest = chilkat2.Imap()

# Connect to our destination IMAP server.
imapDest.Ssl = True
imapDest.Port = 993
success = imapDest.Connect("MY-IMAP-DOMAIN2")
if (success != True):
    print(imapDest.LastErrorText)
    sys.exit()

# Login to the destination IMAP server
success = imapDest.Login("MY-IMAP-LOGIN2","MY-IMAP-PASSWORD2")
if (success != True):
    print(imapDest.LastErrorText)
    sys.exit()

# Select a source IMAP mailbox on the source IMAP server
success = imapSrc.SelectMailbox("Inbox")
if (success != True):
    print(imapSrc.LastErrorText)
    sys.exit()

fetchUids = True

# Get the set of UIDs for all emails on the source server.
# mset is a CkMessageSet
mset = imapSrc.Search("ALL",fetchUids)
if (imapSrc.LastMethodSuccess != True):
    print(imapSrc.LastErrorText)
    sys.exit()

# Load the complete set of UIDs that were previously copied.
# We dont' want to copy any of these to the destination.
fac = chilkat2.FileAccess()
msetAlreadyCopied = chilkat2.MessageSet()
strMsgSet = fac.ReadEntireTextFile("qa_cache/saAlreadyLoaded.txt","utf-8")
if (fac.LastMethodSuccess == True):
    msetAlreadyCopied.FromCompactString(strMsgSet)

numUids = mset.Count
sbFlags = chilkat2.StringBuilder()

i = 0
while i < numUids :

    # If this UID was not already copied...
    uid = mset.GetId(i)
    if (not msetAlreadyCopied.ContainsId(uid)):

        print("copying " + str(uid) + "...")

        # Get the flags.
        flags = imapSrc.FetchFlags(uid,True)
        if (imapSrc.LastMethodSuccess == False):
            print(imapSrc.LastErrorText)
            sys.exit()

        sbFlags.SetString(flags)

        # Get the MIME of this email from the source.
        mimeStr = imapSrc.FetchSingleAsMime(uid,True)
        if (imapSrc.LastMethodSuccess == False):
            print(imapSrc.LastErrorText)
            sys.exit()

        seen = sbFlags.Contains("\\Seen",False)
        flagged = sbFlags.Contains("\\Flagged",False)
        answered = sbFlags.Contains("\\Answered",False)
        draft = sbFlags.Contains("\\Draft",False)

        success = imapDest.AppendMimeWithFlags("Inbox",mimeStr,seen,flagged,answered,draft)
        if (success != True):
            print(imapDest.LastErrorText)
            sys.exit()

        # 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

# Disconnect from the IMAP servers.
success = imapSrc.Disconnect()
success = imapDest.Disconnect()