Adds a file to the MMS body. The content type is specified as text. Use this function to append content with no well-known (numeric) content type.
MmsLib.bdh
MmsAddFileEx( in hMms : number, in sFile : string, in sContentType : string, in sContentId : string, in nContentLocation : 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. |
sContentType | 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"); MmsAddFileEx(hMms, "audio.amr", "audio/amr", "sound", "sound"); WapPostMms("http://10.5.8.12:8899/mmsc", hMms); MmsDeleteMms(hMms); end TInit;