Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
Read IMAP MailboxRead all emails from an IMAP mailbox.
// Needs #include <CkImap.h> // Needs #include <CkMessageSet.h> // Needs #include <CkEmailBundle.h> // Needs #include <CkEmail.h> CkString strOut; CkImap imap; bool success; // Anything unlocks the component and begins a fully-functional 30-day trial. success = imap.UnlockComponent("Anything for 30-day trial"); if (success != true) { strOut.append(imap.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Connect to an IMAP server. success = imap.Connect("mail.chilkatsoft.com"); if (success != true) { strOut.append(imap.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Login success = imap.Login("myLogin","myPassword"); if (success != true) { strOut.append(imap.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Select an IMAP mailbox success = imap.SelectMailbox("Inbox"); if (success != true) { strOut.append(imap.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } CkMessageSet *messageSet = 0; // We can choose to fetch UIDs or sequence numbers. bool fetchUids; fetchUids = true; // Get the message IDs of all the emails in the mailbox messageSet = imap.Search("ALL",fetchUids); if (messageSet == 0 ) { strOut.append(imap.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Fetch the emails into a bundle object: CkEmailBundle *bundle = 0; bundle = imap.FetchBundle(*messageSet); if (bundle == 0 ) { delete messageSet; strOut.append(imap.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Loop over the bundle and display the FROM and SUBJECT of each. long i; for (i = 0; i <= bundle->get_MessageCount() - 1; i++) { CkEmail *email = 0; email = bundle->GetEmail(i); strOut.append(email->ck_from()); strOut.append("\r\n"); strOut.append(email->subject()); strOut.append("\r\n"); strOut.append("--"); strOut.append("\r\n"); delete email; } // Disconnect from the IMAP server. imap.Disconnect(); delete messageSet; delete bundle; SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2008 Chilkat Software, Inc. All Rights Reserved.