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
(Unicode C) Delete All IMAP EmailDemonstrates two ways to delete all email in a mailbox on an IMAP server.
#include <C_CkImapW.h> #include <C_CkMessageSetW.h> void ChilkatSample(void) { HCkImapW imap; BOOL success; HCkMessageSetW messageSet; int i; int n; // This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. imap = CkImapW_Create(); // Turn on session logging: CkImapW_putKeepSessionLog(imap,TRUE); // Connect to an IMAP server. // Use TLS CkImapW_putSsl(imap,TRUE); CkImapW_putPort(imap,993); success = CkImapW_Connect(imap,L"imap.someMailServer.com"); if (success != TRUE) { wprintf(L"%s\n",CkImapW_lastErrorText(imap)); CkImapW_Dispose(imap); return; } // Login success = CkImapW_Login(imap,L"myLogin",L"myPassword"); if (success != TRUE) { wprintf(L"%s\n",CkImapW_lastErrorText(imap)); CkImapW_Dispose(imap); return; } // Select an IMAP mailbox success = CkImapW_SelectMailbox(imap,L"Inbox.RubyMail"); if (success != TRUE) { wprintf(L"%s\n",CkImapW_lastErrorText(imap)); CkImapW_Dispose(imap); return; } // Get the complete set of Uids for email in the selected mailbox. messageSet = CkImapW_GetAllUids(imap); if (CkImapW_getLastMethodSuccess(imap) != TRUE) { wprintf(L"%s\n",CkImapW_lastErrorText(imap)); CkImapW_Dispose(imap); return; } // Set the Deleted flag for each message. // (ExpungeAndClose must be called to finalize the delete.) success = CkImapW_SetFlags(imap,messageSet,L"Deleted",1); if (success != TRUE) { wprintf(L"%s\n",CkImapW_lastErrorText(imap)); CkImapW_Dispose(imap); return; } // Alternatively, the Deleted flag may be set for each UID // individiually, but this is less efficient: n = CkMessageSetW_getCount(messageSet); for (i = 0; i <= n - 1; i++) { success = CkImapW_SetFlag(imap,CkMessageSetW_GetId(messageSet,i),CkMessageSetW_getHasUids(messageSet),L"Deleted",1); if (success != TRUE) { wprintf(L"%s\n",CkImapW_lastErrorText(imap)); CkImapW_Dispose(imap); return; } } // Expunge and close the mailbox. success = CkImapW_ExpungeAndClose(imap); if (success != TRUE) { wprintf(L"%s\n",CkImapW_lastErrorText(imap)); CkImapW_Dispose(imap); return; } // Display the session log. wprintf(L"%s\n",CkImapW_sessionLog(imap)); // Disconnect from the IMAP server. success = CkImapW_Disconnect(imap); CkMessageSetW_Dispose(messageSet); CkImapW_Dispose(imap); } |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.