Sample code for 30+ languages & platforms
Visual Basic 6.0

Get the Entire MIME Header Section

See more MIME Examples

Demonstrates the Chilkat Mime.GetEntireHead method, which returns the complete serialized header section of the current entity. It takes no arguments; the body and any multipart child content are not included.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: This gives you just the headers of the current entity as text — the block above the blank line that separates headers from body. It is convenient for logging or displaying a message's metadata, or for examining the headers without the potentially large body. Its complement is GetEntireBody.

Chilkat Visual Basic 6.0 Downloads

Visual Basic 6.0
Dim success As Long
success = 0

Dim mime As New ChilkatMime
success = mime.LoadMimeFile("qa_data/message.eml")
If (success = 0) Then
    Debug.Print mime.LastErrorText
    Exit Sub
End If

'  Return the complete serialized header section of the current entity.  The body and any
'  multipart child content are not included.
Dim headers As String
headers = mime.GetEntireHead()
If (mime.LastMethodSuccess = 0) Then
    Debug.Print mime.LastErrorText
    Exit Sub
End If

Debug.Print headers