Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
Reading Unread POP3 EmailThe POP3 protocol does not provide the ability to ask the server which emails are "unread". Furthermore, a pure POP3 server does not even keep this information. Some servers, such as Exchange Server, expose both POP3 and IMAP interfaces. In these cases, information about read/unread status exists on the server, but it is only available via the IMAP protocol. Email clients such as Outlook and Thunderbird keep read/unread information on the client computer. This example demonstrates how UIDLs can be saved to track and read "unread" email.
// Needs #include <CkMailMan.h> // Needs #include <CkStringArray.h> // Needs #include <CkEmailBundle.h> // Needs #include <CkEmail.h> CkString strOut; // The mailman object is used for receiving (POP3) // and sending (SMTP) email. CkMailMan mailman; // Any string argument automatically begins the 30-day trial. bool success; success = mailman.UnlockComponent("30-day trial"); if (success != true) { strOut.append("Component unlock failed\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Set the POP3 server's hostname mailman.put_MailHost("mail.chilkatsoft.com"); // Set the POP3 login/password. mailman.put_PopUsername("***"); mailman.put_PopPassword("***"); // We're keeping a list of already-seen UIDLs in a text file: // If this is the first time you're running this example, // create an empty text file named "seenUidls.txt" CkStringArray saSeenUidls; success = saSeenUidls.LoadFromFile("seenUidls.txt"); if (success != true) { strOut.append("failed to load seenUidls.txt\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Get the complete list of UIDLs on the mail server. CkStringArray *saUidls = 0; saUidls = mailman.GetUidls(); if (saUidls == 0 ) { strOut.append(mailman.lastErrorText()); strOut.append("\r\n"); SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // We don't have set operators (yet) on the StringArray object, // so create a new string array object (it's an object, not an actual array) // and add the UIDLs from saUidls that aren't already seen. CkStringArray saUnseenUidls; long i; long n; n = saUidls->get_Count(); for (i = 0; i <= n - 1; i++) { if (saSeenUidls.Contains(saUidls->getString(i)) != true) { saUnseenUidls.Append(saUidls->getString(i)); } } if (saUnseenUidls.get_Count() == 0) { strOut.append("No unseen emails!\r\n"); delete saUidls; SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } // Download in full the unseen emails: CkEmailBundle *bundle = 0; bundle = mailman.FetchMultiple(saUnseenUidls); if (bundle == 0 ) { strOut.append(mailman.lastErrorText()); strOut.append("\r\n"); delete saUidls; SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); return; } CkEmail *email = 0; for (i = 0; i <= bundle->get_MessageCount() - 1; i++) { 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; } // We've seen all the emails, save saUidls to "seenUidls.txt" saUidls->SaveToFile("seenUidls.txt"); delete saUidls; SetDlgItemText(IDC_EDIT1,strOut.getUnicode()); |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2008 Chilkat Software, Inc. All Rights Reserved.