Sample code for 30+ languages & platforms
Lianja

Transition from MailMan.FetchMultiple to MailMan.FetchUidlSet

Provides instructions for replacing deprecated FetchMultiple method calls with FetchUidlSet.

Chilkat Lianja Downloads

Lianja
llSuccess = .F.

loMailman = createobject("CkMailMan")

// ...
// ...

loSaUidls = createobject("CkStringArray")
loSaUidls.Append("aaa")
loSaUidls.Append("bbb")
loSaUidls.Append("ccc")

loStUidls = createobject("CkStringTable")
loStUidls.Append("aaa")
loStUidls.Append("bbb")
loStUidls.Append("ccc")

// ------------------------------------------------------------------------
// The FetchMultiple method is deprecated:

loBundleObj = loMailman.FetchMultiple(loSaUidls)
if (loMailman.LastMethodSuccess = .F.) then
    ? loMailman.LastErrorText
    release loMailman
    release loSaUidls
    release loStUidls
    return
endif

// ...
// ...

release loBundleObj

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

llHeadersOnly = .F.
// Irrelevant because we are not downloading headers-only.
lnNumBodyLines = 0

loBundleOut = createobject("CkEmailBundle")
llSuccess = loMailman.FetchUidlSet(loStUidls,llHeadersOnly,lnNumBodyLines,loBundleOut)
if (llSuccess = .F.) then
    ? loMailman.LastErrorText
    release loMailman
    release loSaUidls
    release loStUidls
    release loBundleOut
    return
endif



release loMailman
release loSaUidls
release loStUidls
release loBundleOut