Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ Delphi FoxPro Java Perl Python Ruby SQL Server VBScript
|
Delete All Email in a POP3 MailboxDelete all email in a POP3 mailbox.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' The mailman object is used for receiving (POP3) ' and sending (SMTP) email. set mailman = Server.CreateObject("Chilkat.MailMan2") ' Any string argument automatically begins the 30-day trial. success = mailman.UnlockComponent("30-day trial") If (success <> 1) Then Response.Write Server.HtmlEncode("Component unlock failed") & "<br>" End If ' Set the POP3 server's hostname mailman.MailHost = "mail.chilkatsoft.com" ' Set the POP3 login/password. mailman.PopUsername = "matt@chilkatsoft.com" mailman.PopPassword = "****" ' Make sure the ImmediateDelete property is set (this is the default) ' If ImmediateDelete is not set, messages marked for deletion ' by the Delete* methods will not be deleted until the POP3 ' connection is closed by calling Pop3EndSession. mailman.ImmediateDelete = 1 ' First, get all the UIDLs. Set sa = mailman.GetUidls() ' Next, delete them all. success = mailman.DeleteMultiple(sa) If (success <> 1) Then Response.Write Server.HtmlEncode(mailman.LastErrorText) & "<br>" End If ' We're done with the POP3 session, so it doesn't hurt to call this... mailman.Pop3EndSession %> </body> </html> |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2008 Chilkat Software, Inc. All Rights Reserved.