Adds a file to the MMS body.
MmsLib.bdh
MmsAddFile( in hMms : number,
in sFile : string,
in nContentType : number,
in sContentId : string,
in sContentLocation : string): boolean;
true if successful
false otherwise
| Parameter | Description |
|---|---|
| hMms | Handle for the MMS, returned by a call to MmsCreateMms. |
| sFile | File to add to the MMS. |
| nContentType | Specifies the content type. See mmslib.bdh for available values. |
| sContentId | Specifies the content ID. |
| sContentLocation | Specifies the content location. |
dcltrans transaction TInit var hMms : number; begin MmsCreateMms(hMms); MmsSetHeader(hMms, MMS_HEADER_MsgType, MMS_M_SEND_REQ); MmsSetHeader(hMms, MMS_HEADER_MmsVersion, MMS_MSGVERSION_10); MmsSetHeader(hMms, MMS_HEADER_ContentType, WAP_CONTENT_ApplicationVndWapMultipartRelated); MmsSetHeaderString(hMms, MMS_HEADER_From, "31743678001"); MmsSetHeaderString(hMms, MMS_HEADER_To, "31743689031"); MmsSetHeaderString(hMms, MMS_HEADER_TransactionId, "17"); MmsAddFile(hMms, "smile.gif", WAP_CONTENT_ImageGif, "smile.gif", "smile.gif"); WapPostMms("http://10.5.8.12:8899/mmsc", hMms); MmsDeleteMms(hMms); end TInit;