Modify Content-Disposition Header Fields in MIME

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

Demonstrates how to edit the Content-Disposition header in MIME sub-parts.

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%

'  The intent of this example is to modify Content-Disposition
'  header fields from this:
' 
'  Content-Disposition: attachment; filename="a4 manuscript.pdf"; size=0;
'  	creation-date="Thu, 12 Apr 2007 06:39:10 GMT";
'  	modification-date="Thu, 12 Apr 2007 06:39:10 GMT"
' 
'  to this:
' 
'  content-disposition: attachment;
'  	 filename="a4 manuscript.pdf"
' 

set mime = Server.CreateObject("Chilkat_9_5_0.Mime")

success = mime.UnlockComponent("Anything for 30-day trial")
If (success = 0) Then
    Response.Write "Failed to unlock" & "<br>"

End If

success = mime.LoadMimeFile("testMime.txt")
If (success = 0) Then
    Response.Write mime.LastErrorText & "<br>"

End If

'  This example assumes the header fields to be modified
'  are located directly beneath the top-level MIME part.

numParts = mime.NumParts

For i = 0 To numParts - 1
    Set mimePart = mime.GetPart(i)

    disposition = mimePart.Disposition
    If (disposition = "attachment") Then
        filename = mimePart.Filename
        '  AddHeaderField replaces the existing field if it already exists.
        '  Discard the contents of the existing Content-Disposition
        '  and replace it with "attachment".
        mimePart.AddHeaderField "content-disposition","attachment"

        '  Now add the filename attribute:
        mimePart.Filename = filename
    End If

Next

success = mime.SaveMime("modifiedMime.txt")


%>
</body>
</html>