|
Summary
Used to set the message data to be appended to the specified mailbox.
Description
The OnAppend event occurs in response to calling the Append method. The append event occurs to get the message to be appended. The Buffer parameter should be set to the message data
to be appended and the Length parameter should be set to the number of bytes of message data. The IMAP ActiveX will keep firing the OnAppend event until the Buffer parameter is set
to an empty string and the Length parameter is set to 0.
Example
Private Sub Imap_OnAppend(Buffer As String, Length As Long)
' Get message data to Append to a mailbox
In response to the append method
If (m_initAppend) Then
'open the message source file
Length = FileLen(Filename)
Open Filename For Input As #3
'read from the file and set it to Buffer
Buffer = Input(Length, #3)
m_initAppend = False
Close #3
Else
' done
Buffer = ""
Length = 0 End If
End Sub
|