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;