The Text property specifies the text of a text-message e-mail.
Type: | String |
Run time: | Read-write |
object1.object2.Text
Syntax Element | Description |
---|---|
object1 | E-mail (MSMQMailEMail) object that defines the e-mail message. |
object2 | Text message data (MSMQMailTextMessageData) object that represents the text message. |
String representation of message body.
This example defines an e-mail object as a text message, setting the text message body to "This is a text message". The e-mail object is then used to compose the body of a mail message, and a message box displays the text of the mail.
To try this example using Microsoft Visual Basic (version 5.0), paste the code into the Code window of a form, run the example, and click the form.
Dim email As New MSMQMailEMail
Dim msg As New MSMQMessage
Private Sub Form_Click()
'***********************
'* Define e-mail object
'***********************
'Set e-mail type to text message
email.ContentType = MSMQMAIL_EMAIL_TEXTMESSAGE
'Add Recipients
email.Recipients.Add "Connector Recipient Name", "ExchangeUser@ServerInputQueueLabel", MSMQMAIL_RECIPIENT_TO
email.Recipients.Add "MAPI Recipient Name", "MAPIUserInputQueueLabel", MSMQMAIL_RECIPIENT_CC
'Set who sent the e-mail.
email.Sender.Name = "Our name"
email.Sender.Address = "Our queue label"
'Set the subject of the e-mail.
email.Subject = "Test mail."
'Set the Body of the e-mail.
email.TextMessageData.Text = "This is the Body of the message."
'**********************
'* Compose message Body
'**********************
msg.Body = email.ComposeBody
'******************
'* Display subject.
'******************
MsgBox "The text of the message is:" + email.TextMessageData.Text
End Sub
Windows NT: Requires version 4.0 SP3 or later.
Windows: Requires Windows 95 or later.
Windows CE: Unsupported.
Import Library: Included as a resource in mqmailoa.dll.
Unicode: Defined only as Unicode.
Add, Address, Body, ComposeBody, ContentType, MSMQMailEMail, MSMQMessage, Name, Recipients, Sender, Subject, TextMessageData