B4X

Remove a MIME Header Field

Demonstrates the Chilkat Mime.RemoveHeaderField method, which removes header fields whose name matches case-insensitively. The first argument is the field name and the second (bAllOccurrences) selects whether to remove all matches or only the first. It is a void method.

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

Background: Stripping headers is common when reprocessing a message — removing spam-scoring X- headers, clearing an old Content-Length before re-serializing, or deleting routing headers before forwarding. The all-occurrences flag matters for headers that can repeat: pass true to purge every instance, or false to drop just the first.

Chilkat B4X Downloads

Download Chilkat for B4X

B4X

Dim success As Boolean = False

Dim mime As ChilkatMime
mime.Initialize
success = mime.LoadMimeFile("qa_data/message.eml")
If success = False Then
    Log(mime.LastErrorText)
    Return
End If


'  Remove header fields whose name matches (case-insensitively).  The 1st argument is the field
'  name and the 2nd (bAllOccurrences) selects whether to remove all matches or only the first.
'  RemoveHeaderField is a void method.

'  Remove every X-Spam-Status header.
Dim bAllOccurrences As Boolean = True
mime.RemoveHeaderField("X-Spam-Status", bAllOccurrences)

Log("Removed the header field(s).")