Sample code for 30+ languages & platforms
Visual FoxPro

Transition from Email.GetLinkedDomains to Email.LinkedDomains

Provides instructions for replacing deprecated GetLinkedDomains method calls with LinkedDomains.

Chilkat Visual FoxPro Downloads

Visual FoxPro
LOCAL lnSuccess
LOCAL loEmail
LOCAL loSa
LOCAL loSt

lnSuccess = 0

loEmail = CreateObject('Chilkat.Email')

* ...
* ...

* ------------------------------------------------------------------------
* The GetLinkedDomains method is deprecated:

loSa = loEmail.GetLinkedDomains()
IF (loEmail.LastMethodSuccess = 0) THEN
    ? loEmail.LastErrorText
    RELEASE loEmail
    CANCEL
ENDIF

* ...
* ...

RELEASE loSa

* ------------------------------------------------------------------------
* Do the equivalent using LinkedDomains.
* Your application creates a new, empty StringTable object which is passed 
* in the last argument and filled upon success.

loSt = CreateObject('Chilkat.StringTable')
lnSuccess = loEmail.LinkedDomains(loSt)
IF (lnSuccess = 0) THEN
    ? loEmail.LastErrorText
    RELEASE loEmail
    RELEASE loSt
    CANCEL
ENDIF

RELEASE loEmail
RELEASE loSt