OnReceiveComplete Event


Fires when POP3 object has received message data from POP3 server. After firing this event POP3 object will decode the message from MIME format.


Parameters:  
Index As Long Index of the message being retrieved. Allowed range is: 1 <= Index <= POP3.MessageCount  
ByRef Proceed As Boolean Default value is True, which tells MailBee to start decoding message data. You can set it to False to immediately abort POP3 session and disconnect from POP3 server  
Remarks: Events are turned off by default. To enable them, set EnableEvents to True

Usage example:

Option Explicit
Dim WithEvents objPOP3 As MailBee.POP3

Private Sub Form_Load()
  Dim Msgs As MailBee.Messages
  Set objPOP3 = New MailBee.POP3
  objPOP3.LicenseKey = "put your license key here"
  objPOP3.EnableEvents = True
  If objPOP3.Connect ("mailserver.com", 110, "MyName", "MyPassword") Then
    Set Msgs = objPOP3.RetrieveHeaders
    objPOP3.Disconnect
  End If
End Sub

Private Sub objPOP3_OnReceiveComplete(ByVal Index As Long, Proceed As Boolean)
  ' Abort pop3 session if there are more than 100 messages in the mailbox
  If Index > 100 Then Proceed = False 
End Sub

See Also:

EnableEvents Property
OnReceiveStart Event
OnReceiveProgress Event
OnMessageComplete Event


Copyright © 2002-2024, AfterLogic Corporation. All rights reserved.