Tcl

Example: MailMan.FetchAll method

Demonstrates how to call the FetchAll method. Tcl

load ./chilkat.dll

set success 0

set success 0
set mailman [new_CkMailMan]

# Setup mailman with POP3 server and login settings...
# ...
# ...

set bundle [new_CkEmailBundle]

set keepOnServer 1
set headersOnly 0
# numBodyLines only applies if downloading headers-only.
set numBodyLines 0

set success [CkMailMan_FetchAll $mailman $keepOnServer $headersOnly $numBodyLines $bundle]
if {$success == 0} then {
    puts [CkMailMan_lastErrorText $mailman]
    delete_CkMailMan $mailman
    delete_CkEmailBundle $bundle
    exit
}

# ...
# ...

delete_CkMailMan $mailman
delete_CkEmailBundle $bundle