(Unicode C) Subscribe to Mailboxes and List Subscribed Mailboxes

Demonstrates how to list subscribed mailboxes, and unsubscribe/subscribe to a mailbox.

Chilkat C/C++ Library Downloads
MS Visual C/C++ C++ Builder Linux C/C++ Alpine Linux C/C++	MacOS C/C++ iOS C/C++ Android C/C++ MinGW C/C++

#include <C_CkImapW.h>
#include <C_CkMailboxesW.h>

void ChilkatSample(void)
    {
    HCkImapW imap;
    BOOL success;
    const wchar_t *refName;
    const wchar_t *wildcardedMailbox;
    HCkMailboxesW mboxes;
    int i;

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

    imap = CkImapW_Create();

    // 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;
    }

    // First examine the already subscribed mailboxes.
    refName = L"";
    wildcardedMailbox = L"*";

    // Alternatively, the ListMailboxes method can be called to list all mailboxes (both subscribed and unsubscribed).
    mboxes = CkImapW_ListSubscribed(imap,refName,wildcardedMailbox);
    if (CkImapW_getLastMethodSuccess(imap) != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        return;
    }

    for (i = 0; i <= CkMailboxesW_getCount(mboxes) - 1; i++) {
        wprintf(L"%s\n",CkMailboxesW_getName(mboxes,i));
    }

    wprintf(L"----\n");
    CkMailboxesW_Dispose(mboxes);

    // Sample output.

    // INBOX
    // INBOX/recent
    // INBOX/misc
    // INBOX/misc/solutions
    // ...
    // Outbox
    // Deleted Items
    // Sent Items
    // Drafts
    // Junk E-mail
    // Trash
    // Sent
    // Templates

    // Let's unsubscribe to "INBOX/misc/solutions".
    success = CkImapW_Unsubscribe(imap,L"INBOX/misc/solutions");
    if (success != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        return;
    }

    // Get the list of subscribed mailboxes again to verify that "INBOX/misc/solutions" is missing.
    mboxes = CkImapW_ListSubscribed(imap,L"",L"INBOX/misc*");
    if (CkImapW_getLastMethodSuccess(imap) != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        return;
    }

    for (i = 0; i <= CkMailboxesW_getCount(mboxes) - 1; i++) {
        wprintf(L"%s\n",CkMailboxesW_getName(mboxes,i));
    }

    CkMailboxesW_Dispose(mboxes);
    wprintf(L"----\n");

    // Re-subscribe to "INBOX/misc/solutions".
    success = CkImapW_Subscribe(imap,L"INBOX/misc/solutions");
    if (success != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        return;
    }

    // Get the list of subscribed mailboxes again to verify that "INBOX/misc/solutions" is back in the list.
    mboxes = CkImapW_ListSubscribed(imap,L"",L"INBOX/misc*");
    if (CkImapW_getLastMethodSuccess(imap) != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        return;
    }

    for (i = 0; i <= CkMailboxesW_getCount(mboxes) - 1; i++) {
        wprintf(L"%s\n",CkMailboxesW_getName(mboxes,i));
    }

    CkMailboxesW_Dispose(mboxes);
    wprintf(L"----\n");

    // Disconnect from the IMAP server.
    success = CkImapW_Disconnect(imap);


    CkImapW_Dispose(imap);

    }