Appends or concatenates a text to the body of the message.
Syntax:
Parameters:
Returns
Returns 1 if the operation is successful; otherwise returns 0 if the operation fails.
Remarks:
The method allows modifications made to the body of the message. Note, however, that the method PrepareEdi will discard all changes made to the body and replaces it with EDI text.
Example
Dim oEdiDoc As Fredi.ediDocument
Dim oMailDocument As Fredi.mailDocument
Dim oMessage As Fredi.mailMessage
' Create instance of Framework EDI.
Set oEdiDoc = New Fredi.ediDocument
' Get internet mail document object
Set oMailDocument = oEdiDoc.GetMailDocument
' Load the mail document
oMailDocument.Load App.Path & "\SampleMail.TXT"
' Get top level message of the document.
Set oMessage = oMailDocument.GetMessage
oMessage.AddTextToBody "This is additional text added to the message"
oMessage.Save App.Path & "\Output.TXT"
MsgBox "Done"
Samples