Visual FoxPro

Transition from MailMan.LoadXmlFile to EmailBundle.LoadXml

Provides instructions for replacing deprecated LoadXmlFile method calls with EmailBundle.LoadXml. Visual FoxPro

LOCAL lnSuccess
LOCAL loMailman
LOCAL lcFilePath
LOCAL loBundleObj
LOCAL loBundle

lnSuccess = 0

loMailman = CreateObject('Chilkat.MailMan')

* ...
* ...

lcFilePath = "c:/example/emailBundle.xml"

* ------------------------------------------------------------------------
* The LoadXmlFile method is deprecated:

loBundleObj = loMailman.LoadXmlFile(lcFilePath)
IF (loMailman.LastMethodSuccess = 0) THEN
    ? loMailman.LastErrorText
    RELEASE loMailman
    CANCEL
ENDIF

* ...
* ...

RELEASE loBundleObj

* ------------------------------------------------------------------------
* Do the equivalent using EmailBundle.LoadXml.

loBundle = CreateObject('Chilkat.EmailBundle')
lnSuccess = loBundle.LoadXml(lcFilePath)
IF (lnSuccess = 0) THEN
    ? loBundle.LastErrorText
    RELEASE loMailman
    RELEASE loBundle
    CANCEL
ENDIF

RELEASE loMailman
RELEASE loBundle