Chilkat2-Python
Chilkat2-Python
Delete All IMAP Email
Demonstrates two ways to delete all email in a mailbox on an IMAP server.Chilkat Chilkat2-Python Downloads
import sys
import chilkat2
success = False
# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.
imap = chilkat2.Imap()
# Turn on session logging:
imap.KeepSessionLog = True
# Connect to an IMAP server.
# Use TLS
imap.Ssl = True
imap.Port = 993
success = imap.Connect("imap.example.com")
if (success == False):
print(imap.LastErrorText)
sys.exit()
# Login
success = imap.Login("myLogin","myPassword")
if (success == False):
print(imap.LastErrorText)
sys.exit()
# Select an IMAP mailbox
success = imap.SelectMailbox("Inbox.RubyMail")
if (success == False):
print(imap.LastErrorText)
sys.exit()
# Get the complete set of Uids for email in the selected mailbox.
messageSet = chilkat2.MessageSet()
success = imap.QueryMbx("ALL",True,messageSet)
if (success == False):
print(imap.LastErrorText)
sys.exit()
# Set the Deleted flag for each message.
# (ExpungeAndClose must be called to finalize the delete.)
success = imap.SetFlags(messageSet,"Deleted",1)
if (success == False):
print(imap.LastErrorText)
sys.exit()
# Alternatively, the Deleted flag may be set for each UID
# individiually, but this is less efficient:
i = 0
n = messageSet.Count
while i < n :
success = imap.SetFlag(messageSet.GetId(i),messageSet.HasUids,"Deleted",1)
if (success == False):
print(imap.LastErrorText)
sys.exit()
i = i + 1
# Expunge and close the mailbox.
success = imap.ExpungeAndClose()
if (success == False):
print(imap.LastErrorText)
sys.exit()
# Display the session log.
print(imap.SessionLog)
# Disconnect from the IMAP server.
success = imap.Disconnect()