Lianja Requires Chilkat v11.0.0+

Transition from MailMan.GetHeaders to MailMan.FetchRange

Provides instructions for replacing deprecated GetHeaders method calls with FetchRange. Lianja

llSuccess = .F.

loMailman = createobject("CkMailMan")

//  ...
//  ...

lnNumBodyLines = 3
lnFromIndex = 0
lnToIndex = 9

//  ------------------------------------------------------------------------
//  The GetHeaders method is deprecated:

loBundleObj = loMailman.GetHeaders(lnNumBodyLines,lnFromIndex,lnToIndex)
if (loMailman.LastMethodSuccess = .F.) then
    ? loMailman.LastErrorText
    release loMailman
    return
endif

//  ...
//  ...

release loBundleObj

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

llKeepOnServer = .T.
llHeadersOnly = .T.

loBundleOut = createobject("CkEmailBundle")
llSuccess = loMailman.FetchRange(llKeepOnServer,llHeadersOnly,lnNumBodyLines,lnFromIndex,lnToIndex,loBundleOut)
if (llSuccess = .F.) then
    ? loMailman.LastErrorText
    release loMailman
    release loBundleOut
    return
endif



release loMailman
release loBundleOut