Sample code for 30+ languages & platforms
Unicode C

Delete Individual Emails from POP3 Mailbox

Demonstrates how to delete individual emails from a POP3 mailbox.

Chilkat Unicode C Downloads

Unicode C
#include <C_CkMailManW.h>
#include <C_CkEmailBundleW.h>
#include <C_CkEmailW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkMailManW mailman;
    HCkEmailBundleW bundle;
    BOOL keepOnServer;
    BOOL headersOnly;
    int numBodyLines;
    HCkEmailW email;
    int i;

    success = FALSE;

    // This example assumes the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    // The mailman object is used for receiving (POP3) 
    // and sending (SMTP) email.
    mailman = CkMailManW_Create();

    // Set the POP3 server's hostname
    CkMailManW_putMailHost(mailman,L"pop.example.com");

    // Set the POP3 login/password.
    CkMailManW_putPopUsername(mailman,L"myLogin");
    CkMailManW_putPopPassword(mailman,L"myPassword");

    // Set the ImmediateDelete property = FALSE
    // When the DeleteEmail method is called, the POP3 session
    // will remain open and the emails will be deleted all at once
    // when the session closes.
    CkMailManW_putImmediateDelete(mailman,FALSE);

    // Download email headers.  
    bundle = CkEmailBundleW_Create();
    keepOnServer = TRUE;
    headersOnly = TRUE;
    numBodyLines = 1;
    success = CkMailManW_FetchAll(mailman,keepOnServer,headersOnly,numBodyLines,bundle);
    if (success == FALSE) {
        wprintf(L"%s\n",CkMailManW_lastErrorText(mailman));
        CkMailManW_Dispose(mailman);
        CkEmailBundleW_Dispose(bundle);
        return;
    }

    email = CkEmailW_Create();
    i = 0;
    while (i < CkEmailBundleW_getMessageCount(bundle)) {
        CkEmailBundleW_EmailAt(bundle,i,email);

        wprintf(L"From: %s\n",CkEmailW_ck_from(email));
        wprintf(L"Subject: %s\n",CkEmailW_subject(email));

        // If you decide the email is to be deleted, call DeleteEmail.
        // This marks the email for deletion on the POP3 server.
        success = CkMailManW_DeleteEmail(mailman,email);
        if (success == FALSE) {
            wprintf(L"%s\n",CkMailManW_lastErrorText(mailman));
            CkMailManW_Dispose(mailman);
            CkEmailBundleW_Dispose(bundle);
            CkEmailW_Dispose(email);
            return;
        }

        i = i + 1;
    }

    // Make sure the POP3 session is ended to finalize the deletes.
    success = CkMailManW_Pop3EndSession(mailman);
    if (success == FALSE) {
        wprintf(L"%s\n",CkMailManW_lastErrorText(mailman));
        CkMailManW_Dispose(mailman);
        CkEmailBundleW_Dispose(bundle);
        CkEmailW_Dispose(email);
        return;
    }

    wprintf(L"Success!\n");


    CkMailManW_Dispose(mailman);
    CkEmailBundleW_Dispose(bundle);
    CkEmailW_Dispose(email);

    }