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
(PHP Extension) IMAP Delete Old Email (before a specified date)Demonstrates how to delete email older than a particular date.
<?php // The version number (9_5_0) should match version of the Chilkat extension used, omitting the micro-version number. // For example, if using Chilkat v9.5.0.48, then include as shown here: include("chilkat_9_5_0.php"); // This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. $imap = new CkImap(); // Connect to an IMAP server. // Use TLS $imap->put_Ssl(true); $imap->put_Port(993); // Use your IMAP server domain. This example $success = $imap->Connect('my-imap-server-domain.com'); if ($success != true) { print $imap->lastErrorText() . "\n"; exit; } // Login $success = $imap->Login('myLogin','myPassword'); if ($success != true) { print $imap->lastErrorText() . "\n"; exit; } // Select an IMAP mailbox $success = $imap->SelectMailbox('Inbox'); if ($success != true) { print $imap->lastErrorText() . "\n"; exit; } // Get message ID's for emails older than 1/1/2018 $fetchUids = true; // messageSet is a CkMessageSet $messageSet = $imap->Search('SENTBEFORE 01-Jan-2018',$fetchUids); if ($imap->get_LastMethodSuccess() == false) { print $imap->lastErrorText() . "\n"; exit; } // If desired, we can examine the Subject of each email to be deleted.. $i = 0; $count = $messageSet->get_Count(); while ($i < $count) { // email is a CkEmail $email = $imap->FetchSingleHeader($messageSet->GetId($i),true); if ($imap->get_LastMethodSuccess() == true) { print $email->subject() . "\n"; } $i = $i + 1; } // Set the Deleted flag for each message: $success = $imap->SetFlags($messageSet,'Deleted',1); if ($success != true) { print $imap->lastErrorText() . "\n"; exit; } // Expunge and close the mailbox. $success = $imap->ExpungeAndClose(); if ($success != true) { print $imap->lastErrorText() . "\n"; exit; } // Disconnect from the IMAP server. $success = $imap->Disconnect(); ?> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.