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 boolean value of True is returned if the method succeeds, otherwise a value of False is returned. For more information about the cause of the failure, check the value of the LastError property.

Remarks

The GetNextHeader method allows an application to enumerate all of the headers in the current message. When all of the headers in the current message part have been returned, 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 = InternetMail1.GetFirstHeader(strHeader, strValue)
Do While bResult
    List1.AddItem strHeader & ": " & strValue
    bResult = InternetMail1.GetNextHeader(strHeader, strValue)
Loop

See Also

MessagePart Property, GetFirstHeader Method, GetHeader Method, SetHeader Method