(Tcl) Transition from Imap.Search to Imap.QueryMbx
Provides instructions for replacing deprecated Search method calls with QueryMbx. Note: This example requires Chilkat v11.0.0 or greater.
load ./chilkat.dll
set imap [new_CkImap]
# ...
# ...
set criteria "FROM bob@example.com"
set bUid 1
# ------------------------------------------------------------------------
# The Search method is deprecated:
# msgSetObj is a CkMessageSet
set msgSetObj [CkImap_Search $imap $criteria $bUid]
if {[CkImap_get_LastMethodSuccess $imap] == 0} then {
puts [CkImap_lastErrorText $imap]
delete_CkImap $imap
exit
}
# ...
# ...
delete_CkMessageSet $msgSetObj
# ------------------------------------------------------------------------
# Do the equivalent using QueryMbx.
# Your application creates a new, empty MessageSet object which is passed
# in the last argument and filled upon success.
set mset [new_CkMessageSet]
set success [CkImap_QueryMbx $imap $criteria $bUid $mset]
if {$success == 0} then {
puts [CkImap_lastErrorText $imap]
delete_CkImap $imap
delete_CkMessageSet $mset
exit
}
delete_CkImap $imap
delete_CkMessageSet $mset
|