|
Summary
Specifies the current status of a message.
Description
The ImapFlags property specifies the current status of a fetched message.
To get the message flags call the Fetch or UidFetch method with the DataItem parameter set to IMAP_FLAGS. The OnImapHeader event will be fired, in this event check that the Mask parameter contains
the field IMAP_FLAGS_VALID. If it does, then the message has a valid message flag and the ImapFlags property will contain the message status. This property can be changed using the Store method.
The ImapFlags property can be a combination of the following values:
| IMAP_MSG_SEEN |
Message has been read |
| IMAP_MSG_ANSWERED |
Message has been answered |
| IMAP_MSG_FLAGGED |
Message is "flagged" for urgent/special attention |
| IMAP_MSG_DELETED |
Message has the deleted flag set |
| IMAP_MSG_RECENT |
Message has arrived since the mailbox was last accessed |
| IMAP_MSG_DRAFT |
Message has not completed composition |
This property is read only. There is no default value for this property.
Example
Private Sub Imap_OnImapHeader(MsgNum As Long, MsgUid As Long, Mask As Long, Buffer As String, Length As Long)
'Deliver fetched IMAP Mask, Message number and reply buffer
'Notifies of Imap properties set
Message = "Fetched attributes from message " " & MsgNum + Chr(13) + Chr (10)
If (Mask And IMAP_FLAGS_VALID) Then
Message = Message + "Message flags : " + Imap.ImapFlag End If
.
.
List.Text = List.Text + Chr(13) + Chr(10) + Message
End Sub
|