|
Summary
The message section content subtype.
Description
The MimeSubtype property contains the content subtype of the message. The MimeType and MimeSubtype properties together specify the "Content Type" field of the message. The MimeSubtype
property values differ depending on the MimeType property. Some of the subtypes are listed below.
| MimeType |
MimeSubtype |
Meaning |
| "text" |
"plain" |
Plain unformatted text. |
| "audio" |
"basic" |
Audio format. |
| "video" |
"mpeg" |
Video format. |
| "image" |
"gif" |
GIF image format |
| |
"jpeg" |
JPEG image format. |
| "message" |
"partial" |
Fragmented transmission of messages (if original is too large). |
| |
"external-body" |
Reference to an external body source. |
| "multipart" |
"mixed" |
Body parts with independent types. |
| |
"alternative" |
Alternative versions of the same information. |
| |
"digest" |
Multipart entities of MimeType "message". |
| |
"parallel" |
Parts intended to be viewed simultaneously. |
| |
"related" |
Message has related body parts. |
| "application" |
"octet-stream" |
Uninterpreted binary data. |
| |
"mac-binhex40" |
Binhex encoded data |
A MimeType of "message" and MimeSubtype of "partial" is a partial message where the source is sent in parts. A MimeType of "message" and MimeSubtype of "external-body" is an external message which
contains only a reference to the data source and not the data itself.
To get the subtype call the Fetch or UidFetch method with the DataItem parameter set to IMAP_BODY_STRUCT. The OnMimeHeader event will be fired, in this event check that the Mask parameter contains
the field IMAP_SUBTYPE_VALID. If it does then MimeSubtype property is valid.
This property is only valid at runtime and in the OnMimeHeader event. There is no default value for this property.
Example
Private Sub Imap_OnMimeHeader (MsgNum As Long, MsgUid As Long, Mask As Long, Buffer As String, Length As Long)
'Deliver fetched MIME Mask, Message number and reply buffer
'Notifies of MIME properties set
Message = "Fetched attributes from message " " & MsgNum + Chr(13) + Chr (10)
If (Mask And IMAP_SUBTYPE_VALID) Then
Message = Message + "Subtype: " & Imap.MimeSubtype
End If
.
.
List.Text = List.Text + Chr(13) + Chr(10) + Message
End Sub
| 
