Embed PDF, MS-WORD, XML, and GIF in Multipart/Mixed MIME

Create MIME containing a PDF, MS-WORD document, XML document, and GIF image.

The MIME produced by this example (scroll down to see code) looks like this:

Content-Type: multipart/mixed;
	boundary="-----_chilkat_497_6119_39274c1d.69931ed1_.MIX"

This is a multi-part message in MIME format.

-------_chilkat_497_6119_39274c1d.69931ed1_.MIX
content-disposition: attachment;
	 filename="dude.gif"
content-transfer-encoding: base64
Content-Type: image/gif;
	name="dude.gif"

R0lGODlhZABkAPf/AP////f39+fn7+/v9/f3/+fn99bW597e79bW78bG3s7O57291rW1zsbG
57293rW11q2tzqWlxq2t1qWlzpycxpSUvYyMtYSErZyczpSUxoyMvYSEtXt7rYSEvXt7tXNz
...
wxAGcf2vMwE08FYXMvmrAuSR4E84VAhILTAsJDIijyQim9P1jVQpglWrG0ADLOABJYG5GjBs
ClERHqH/GBUQADs=

-------_chilkat_497_6119_39274c1d.69931ed1_.MIX
content-disposition: attachment;
	 filename="dude.gif"
content-transfer-encoding: base64
Content-Type: image/gif;
	name="dude.gif"

R0lGODlhZABkAPf/AP////f39+fn7+/v9/f3/+fn99bW597e79bW78bG3s7O57291rW1zsbG
57293rW11q2tzqWlxq2t1qWlzpycxpSUvYyMtYSErZyczpSUxoyMvYSEtXt7rYSEvXt7tXNz
...
wxAGcf2vMwE08FYXMvmrAuSR4E84VAhILTAsJDIijyQim9P1jVQpglWrG0ADLOABJYG5GjBs
ClERHqH/GBUQADs=

-------_chilkat_497_6119_39274c1d.69931ed1_.MIX
content-disposition: attachment;
	 filename="halfMarathonWaiver.pdf"
content-transfer-encoding: base64
Content-Type: application/pdf;
	name="halfMarathonWaiver.pdf"

JVBERi0xLjMKJcfsj6IKNSAwIG9iago8PC9MZW5ndGggNiAwIFIvRmlsdGVyIC9GbGF0ZURl
Y29kZT4+CnN0cmVhbQp4nO1bbW/cuBH+vr9CRfthdcgqJEVRYoAidV7uLkWS3qUGgiJXFM7G
...
Ci9JRCBbKHsfO+TdPLVEgU+Ir7qbh10pKHsfO+TdPLVEgU+Ir7qbh10pXQo+PgpzdGFydHhy
ZWYKMzMzMjEKJSVFT0YK

-------_chilkat_497_6119_39274c1d.69931ed1_.MIX
content-disposition: attachment;
	 filename="sample.doc"
content-transfer-encoding: base64
Content-Type: application/msword;
	name="sample.doc"

0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAACAAAAzwAAAAAA
AAAAEAAA0QAAAAEAAAD+////AAAAAM0AAADOAAAA////////////////////////////////
...
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAA==

-------_chilkat_497_6119_39274c1d.69931ed1_.MIX
content-disposition: attachment;
	 filename="pigs.xml"
content-transfer-encoding: 7bit
Content-Type: text/xml;
	name="pigs.xml"

<pig-rescue>
	<image-base>images</image-base>
    <animal>
    	<species>pot belly pig</species>
    	<type>Cathy's Herd</type>
        <name>Molly II</name>
        <birth>February, 1998</birth>
...
</pig-rescue>          
                            

-------_chilkat_497_6119_39274c1d.69931ed1_.MIX--

LOCAL loMime
LOCAL lnSuccess

loMime = CreateObject('Chilkat.Mime')

lnSuccess = loMime.UnlockComponent("Anything for 30-day trial")
IF (lnSuccess = 0) THEN
    =MESSAGEBOX("Failed to unlock component")
    QUIT
ENDIF

*  Initialize this MIME object as a multipart/mixed:
lnSuccess = loMime.NewMultipartMixed()

*  Now insert some files:
lnSuccess = loMime.AppendPartFromFile("dude.gif")
IF (lnSuccess = 0) THEN
    =MESSAGEBOX(loMime.LastErrorText)
    QUIT
ENDIF

*  Insert a GIF Image into the MIME:
lnSuccess = loMime.AppendPartFromFile("dude.gif")
IF (lnSuccess = 0) THEN
    =MESSAGEBOX(loMime.LastErrorText)
    QUIT
ENDIF

*  Add a PDF to the MIME:
lnSuccess = loMime.AppendPartFromFile("halfMarathonWaiver.pdf")
IF (lnSuccess = 0) THEN
    =MESSAGEBOX(loMime.LastErrorText)
    QUIT
ENDIF

*  Add a MS-Word file to the MIME
lnSuccess = loMime.AppendPartFromFile("sample.doc")
IF (lnSuccess = 0) THEN
    =MESSAGEBOX(loMime.LastErrorText)
    QUIT
ENDIF

*  Add an XML document to the MIME:
lnSuccess = loMime.AppendPartFromFile("pigs.xml")
IF (lnSuccess = 0) THEN
    =MESSAGEBOX(loMime.LastErrorText)
    QUIT
ENDIF

*  Save the MIME to a file.
lnSuccess = loMime.SaveMime("outMime.txt")
IF (lnSuccess = 0) THEN
    =MESSAGEBOX(loMime.LastErrorText)
    QUIT
ENDIF

*  Success!
=MESSAGEBOX("Success!")