Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Ruby) Delete All IMAP EmailDemonstrates two ways to delete all email in a mailbox on an IMAP server.
require 'chilkat' # This example requires the Chilkat API to have been previously unlocked. # See Global Unlock Sample for sample code. imap = Chilkat::CkImap.new() # Turn on session logging: imap.put_KeepSessionLog(true) # 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() + "\n"; exit end # Login success = imap.Login("myLogin","myPassword") if (success != true) print imap.lastErrorText() + "\n"; exit end # Select an IMAP mailbox success = imap.SelectMailbox("Inbox.RubyMail") if (success != true) print imap.lastErrorText() + "\n"; exit end # Get the complete set of Uids for email in the selected mailbox. # messageSet is a CkMessageSet messageSet = imap.GetAllUids() if (imap.get_LastMethodSuccess() != true) print imap.lastErrorText() + "\n"; exit end # 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() + "\n"; exit end # Alternatively, the Deleted flag may be set for each UID # individiually, but this is less efficient: n = messageSet.get_Count() for i in 0 .. n - 1 success = imap.SetFlag(messageSet.GetId(i),messageSet.get_HasUids(),"Deleted",1) if (success != true) print imap.lastErrorText() + "\n"; exit end end # Expunge and close the mailbox. success = imap.ExpungeAndClose() if (success != true) print imap.lastErrorText() + "\n"; exit end # Display the session log. print imap.sessionLog() + "\n"; # Disconnect from the IMAP server. success = imap.Disconnect() |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.