Sample code for 30+ languages & platforms
Visual FoxPro

Transition from MailMan.LoadMime to Email.SetFromMimeText

Provides instructions for replacing deprecated LoadMime method calls with Email.SetFromMimeText.

Chilkat Visual FoxPro Downloads

Visual FoxPro
LOCAL lnSuccess
LOCAL loMailman
LOCAL lcMimeText
LOCAL loEmailObj
LOCAL loEmail

lnSuccess = 0

loMailman = CreateObject('Chilkat.MailMan')

* ...
* ...

lcMimeText = "...."

* ------------------------------------------------------------------------
* The LoadMime method is deprecated:

loEmailObj = loMailman.LoadMime(lcMimeText)
IF (loMailman.LastMethodSuccess = 0) THEN
    ? loMailman.LastErrorText
    RELEASE loMailman
    CANCEL
ENDIF

* ...
* ...

RELEASE loEmailObj

* ------------------------------------------------------------------------
* Do the equivalent using Email.SetFromMimeText.

loEmail = CreateObject('Chilkat.Email')
lnSuccess = loEmail.SetFromMimeText(lcMimeText)
IF (lnSuccess = 0) THEN
    ? loEmail.LastErrorText
    RELEASE loMailman
    RELEASE loEmail
    CANCEL
ENDIF

RELEASE loMailman
RELEASE loEmail