(CkPython) Delete Email Individually (One at a time) from an IMAP Mailbox

Downloads email from an IMAP mailbox and deletes emails individually (one by one).

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

import sys
import chilkat

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

imap = chilkat.CkImap()

# Connect to an IMAP server.
# Use TLS
imap.put_Ssl(True)
imap.put_Port(993)
success = imap.Connect("imap.someMailServer.com")
if (success != True):
    print(imap.lastErrorText())
    sys.exit()

# Login
success = imap.Login("myLogin","myPassword")
if (success != True):
    print(imap.lastErrorText())
    sys.exit()

# Select an IMAP mailbox
success = imap.SelectMailbox("Inbox")
if (success != True):
    print(imap.lastErrorText())
    sys.exit()

# We can choose to fetch UIDs or sequence numbers.
fetchUids = True
# Get the message IDs of all the emails in the mailbox
# messageSet is a CkMessageSet
messageSet = imap.Search("ALL",fetchUids)
if (imap.get_LastMethodSuccess() == False):
    print(imap.lastErrorText())
    sys.exit()

# Fetch the emails into a bundle object:

# bundle is a CkEmailBundle
bundle = imap.FetchBundle(messageSet)
if (imap.get_LastMethodSuccess() == False):

    print(imap.lastErrorText())
    sys.exit()

# To mark a complete set of emails for deletion, call SetFlags:
success = imap.SetFlags(messageSet,"Deleted",1)
if (success != True):
    print(imap.lastErrorText())
    sys.exit()

# Messages can also be marked for deletion individually:
# Loop over the bundle and mark each message for deletion.
i = 0
numEmails = bundle.get_MessageCount()
while i < numEmails :
    # email is a CkEmail
    email = bundle.GetEmail(i)
    print(email.ck_from())
    print(email.subject())

    # To delete this email, set the "Deleted" flag to 1.
    # The email is not actually deleted until Expunge or
    # ExpungeAndClose is called.
    success = imap.SetMailFlag(email,"Deleted",1)
    if (success != True):
        print(imap.lastErrorText())
        sys.exit()

    print("--")

    i = i + 1

success = imap.ExpungeAndClose()
if (success != True):
    print(imap.lastErrorText())

    sys.exit()

# Disconnect from the IMAP server.
success = imap.Disconnect()