Chilkat HOME Android™ ASP Visual Basic VB.NET C# iOS (IPhone) Objective-C C++ C Unicode C++ Unicode C MFC Delphi DLL Delphi ActiveX FoxPro Java Perl PHP Extension PHP ActiveX Python PowerShell Ruby SQL Server VBScript
Read Email with Progress Monitoring
Demonstrates how to use event callbacks to read e-mail in Visual Basic 6.0 using the Chilkat mail component. The callbacks include an abort flag which can be set to force the mail reading to abort. ' When using events, you must declare the mailman "withevents" Public WithEvents mailman As ChilkatMailMan2 Private Sub Command2_Click() mailman.MailHost = "mail.chilkatsoft.com" mailman.PopUsername = "****" mailman.PopPassword = "****" Dim bundle As ChilkatEmailBundle2 ' Copy the email from the POP3 server without removing it. ' The progress bar will update with the percentage completion as ' the CopyMail proceeds. Set bundle = mailman.CopyMail() End Sub Private Sub mailman_ReadPercentDone(ByVal percentDone As Long, abort As Long) ' Set abort = 1 if you wish to abort. ProgressBar1.Value = percentDone End Sub Private Sub Form_Load() Set mailman = New ChilkatMailMan2 mailman.UnlockComponent "Anything for 30-day trial" ProgressBar1.Value = 0 End Sub
|
© 2000-2013 Chilkat Software, Inc. All Rights Reserved.