Classic ASP

Enumerate the Header Fields of an Email

Demonstrates the read-only Chilkat Email.NumHeaderFields property together with GetHeaderFieldName and GetHeaderFieldValue to enumerate every header field. Indexing is zero-based, so fields run from 0 to NumHeaderFields - 1. Repeated header fields (a field name that appears more than once) are counted separately. This example builds a small email and prints each header field.

Background: A header field is a single Name: value line at the top of a MIME message. The same field name can legitimately appear multiple times — for example, a message can carry several Received lines, one added by each mail server it passed through. That is why enumerating by index (rather than looking up by name) matters: it lets you see every occurrence in the order it appears.

Chilkat Classic ASP Downloads

Download Chilkat for Classic ASP

Classic ASP

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
'  Demonstrates the read-only Email.NumHeaderFields property and enumerating each
'  header field by zero-based index using GetHeaderFieldName and GetHeaderFieldValue.

set email = Server.CreateObject("Chilkat.Email")
email.Subject = "Header field enumeration"
email.From = "mary@example.com"
success = email.AddTo("Joe","joe@example.com")

n = email.NumHeaderFields
Response.Write "<pre>" & Server.HTMLEncode( "NumHeaderFields = " & n) & "</pre>"

For i = 0 To n - 1
    Response.Write "<pre>" & Server.HTMLEncode( email.GetHeaderFieldName(i) & ": " & email.GetHeaderFieldValue(i)) & "</pre>"
Next

%>
</body>
</html>