MQSeries.net :: View topic

jennifer.jose26 · Posted: Thu Dec 02, 2010 7:07 am Post subject:

hey,
Does anybody have sample running code to create MIME messages ?

I have the requirement for reading a file that can be a pdf,mp3 etc from a folder , convert it into MIME message with multiple parts of say 10kb each and sending as a reply through HTTP Reply Node...

I managed to get some sample code but seems it doesnt work -

CREATE FIELD OutputRoot.MIME TYPE Name;
DECLARE M REFERENCE TO OutputRoot.MIME;

-- create the Content-Type child of MIME explicitly to ensure the correct order. If we set
-- the ContentType property instead, the field could appear as the last child of MIME.
--CREATE FIELD M."Content-Type" TYPE NameValue VALUE 'multipart/related; boundary=myBoundary';

CREATE FIELD M."Content-Type" TYPE NameValue VALUE 'multipart/mixed; boundary="xxx"; charset="us-ascii"';
CREATE FIELD M."Content-ID" TYPE NameValue VALUE 'new MIME document';

CREATE LASTCHILD OF M TYPE Name NAME 'Parts';
-- some example data â€“ generally this would be available already, perhaps as the result of
-- parsing another subtree.
DECLARE newBlob BLOB InputRoot.BLOB.BLOB;

CREATE LASTCHILD OF M.Parts TYPE Name NAME 'Part';
DECLARE P1 REFERENCE TO M.Parts.Part;

CREATE FIELD P1."Content-Type" TYPE NameValue VALUE 'text/plain';
CREATE FIELD P1."Content-Id" TYPE NameValue VALUE 'part one';
CREATE LASTCHILD OF P1 TYPE Name NAME 'Data';
CREATE LASTCHILD OF P1.Data DOMAIN('BLOB') PARSE(newBlob);

CREATE LASTCHILD OF M.Parts TYPE Name NAME 'Part';
DECLARE P2 REFERENCE TO M.Parts.Part[2];

CREATE FIELD P2."Content-Type" TYPE NameValue VALUE 'text/plain';
CREATE FIELD P2."Content-Id" TYPE NameValue VALUE 'part two';
CREATE LASTCHILD OF P2 TYPE Name NAME 'Data';
CREATE LASTCHILD OF P2.Data DOMAIN('BLOB') PARSE(newBlob);

RETURN TRUE;

Can someone help ?