Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Delete All IMAP EmailDemonstrates two ways to delete all email in a mailbox on an IMAP server.
import sys import chilkat imap = chilkat.CkImap() # Anything unlocks the component and begins a fully-functional 30-day trial. success = imap.UnlockComponent("Anything for 30-day trial") if (success != True): print imap.lastErrorText() sys.exit() # Turn on session logging: imap.put_KeepSessionLog(True) # Connect to an IMAP server. success = imap.Connect("mail.chilkatsoft.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.RubyMail") if (success != True): print imap.lastErrorText() sys.exit() # Get the complete set of Uids for email in the selected mailbox. messageSet = imap.GetAllUids() if (messageSet == None ): 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 != True): print imap.lastErrorText() sys.exit() # Alternatively, the Deleted flag may be set for each UID # individiually, but this is less efficient: n = messageSet.get_Count() for i in range(0,n): success = imap.SetFlag(messageSet.GetId(i),messageSet.get_HasUids(),"Deleted",1) if (success != True): print imap.lastErrorText() sys.exit() # Expunge and close the mailbox. success = imap.ExpungeAndClose() if (success != True): print imap.lastErrorText() sys.exit() # Display the session log. print imap.sessionLog() # Disconnect from the IMAP server. imap.Disconnect() |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2008 Chilkat Software, Inc. All Rights Reserved.