Visual FoxPro

Transition from MailMan.LoadEml to Email.LoadEml

Provides instructions for replacing deprecated MailMan.LoadEml method calls with Email.LoadEml. Visual FoxPro

LOCAL lnSuccess
LOCAL loMailman
LOCAL lcFilePath
LOCAL loEmailObj
LOCAL loEmail

lnSuccess = 0

loMailman = CreateObject('Chilkat.MailMan')

* ...
* ...

lcFilePath = "c:/dir/example.eml"

* ------------------------------------------------------------------------
* The MailMan.LoadEml method is deprecated:

loEmailObj = loMailman.LoadEml(lcFilePath)
IF (loMailman.LastMethodSuccess = 0) THEN
    ? loMailman.LastErrorText
    RELEASE loMailman
    CANCEL
ENDIF

* ...
* ...

RELEASE loEmailObj

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

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

RELEASE loMailman
RELEASE loEmail