Visual FoxPro

Transition from MailMan.LoadXmlEmailString to Email.SetFromXmlText

Provides instructions for replacing deprecated LoadXmlEmailString method calls with Email.SetFromXmlText. Visual FoxPro

LOCAL lnSuccess
LOCAL loMailman
LOCAL lcXmlStr
LOCAL loEmailObj
LOCAL loEmail

lnSuccess = 0

loMailman = CreateObject('Chilkat.MailMan')

* ...
* ...

lcXmlStr = "..."

* ------------------------------------------------------------------------
* The LoadXmlEmailString method is deprecated:

loEmailObj = loMailman.LoadXmlEmailString(lcXmlStr)
IF (loMailman.LastMethodSuccess = 0) THEN
    ? loMailman.LastErrorText
    RELEASE loMailman
    CANCEL
ENDIF

* ...
* ...

RELEASE loEmailObj

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

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

RELEASE loMailman
RELEASE loEmail