GetNextHeader Method  
 

Return the next header in the current message part.

Syntax

object.GetNextHeader( HeaderField, HeaderValue )

Parameters

HeaderField
A string which will contain the name of the next header field when the method returns. This parameter must be passed by reference.
HeaderValue
A string which will contain the value of the next header field when the method returns. This parameter must be passed by reference.

Return Value

A value of True is returned if the next header value was returned. If there are no more header fields in the current message part, this method will return False.

Example

The following example enumerates all of the headers in the main part of the current message and adds them to a listbox:

Dim strHeader As String, strValue As String
Dim bResult As Boolean

bResult = MailMessage1.GetFirstHeader(strHeader, strValue)
Do While bResult
    List1.AddItem strHeader & ": " & strValue
    bResult = MailMessage1.GetNextHeader(strHeader, strValue)
Loop

See Also

Part Property, GetFirstHeader Method, GetHeader Method, SetHeader Method