Visual FoxPro

Email Body - Plain Text and/or HTML

Any given email may have a plain-text body, an HTML body, or both. The Body property will return the HTML body by default (if it exists) otherwise it will return the plain-text body. There are methods for checking to see if an email has a particular body (HasPlainTextBody and HasHtmlBody) and there are methods for getting a specific body: GetHtmlBody, GetPlainTextBody. Visual FoxPro

LOCAL lnSuccess
LOCAL loEmail
LOCAL lnBText
LOCAL lnBHtml

lnSuccess = 0

loEmail = CreateObject('Chilkat.Email')

* Load an email from a .eml

lnSuccess = loEmail.LoadEml("something.eml")
IF (lnSuccess <> 1) THEN
    ? loEmail.LastErrorText
    RELEASE loEmail
    CANCEL
ENDIF

* Display the default Body:
? loEmail.Body

* If a plain-text body is present, display it:

lnBText = loEmail.HasPlainTextBody()
IF (lnBText = 1) THEN
    ? loEmail.GetPlainTextBody()
ENDIF

* If an HTML body is present, display the HTML source:

lnBHtml = loEmail.HasHtmlBody()
IF (lnBHtml = 1) THEN
    ? loEmail.GetHtmlBody()
ENDIF

RELEASE loEmail