|
Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Visual FoxPro) Transition from MailMan.FetchMultiple to MailMan.FetchUidlSetProvides instructions for replacing deprecated FetchMultiple method calls with FetchUidlSet. Note: This example requires Chilkat v11.0.0 or greater.
LOCAL loMailman LOCAL loSaUidls LOCAL loStUidls LOCAL loBundleObj LOCAL lnHeadersOnly LOCAL lnNumBodyLines LOCAL loBundleOut LOCAL lnSuccess * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.MailMan') loMailman = CreateObject('Chilkat.MailMan') * ... * ... * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringArray') loSaUidls = CreateObject('Chilkat.StringArray') loSaUidls.Append("aaa") loSaUidls.Append("bbb") loSaUidls.Append("ccc") * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringTable') loStUidls = CreateObject('Chilkat.StringTable') loStUidls.Append("aaa") loStUidls.Append("bbb") loStUidls.Append("ccc") * ------------------------------------------------------------------------ * The FetchMultiple method is deprecated: loBundleObj = loMailman.FetchMultiple(loSaUidls) IF (loMailman.LastMethodSuccess = 0) THEN ? loMailman.LastErrorText RELEASE loMailman RELEASE loSaUidls RELEASE loStUidls CANCEL 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. lnHeadersOnly = 0 * Irrelevant because we are not downloading headers-only. lnNumBodyLines = 0 * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.EmailBundle') loBundleOut = CreateObject('Chilkat.EmailBundle') lnSuccess = loMailman.FetchUidlSet(loStUidls,lnHeadersOnly,lnNumBodyLines,loBundleOut) IF (lnSuccess = 0) THEN ? loMailman.LastErrorText RELEASE loMailman RELEASE loSaUidls RELEASE loStUidls RELEASE loBundleOut CANCEL ENDIF RELEASE loMailman RELEASE loSaUidls RELEASE loStUidls RELEASE loBundleOut |
||||
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.