(Lianja) Retrieve UIDL's from POP3 Server

Retrieve a list of UIDLs from a POP3 server. A UIDL is an identifier consisting of 1 to 70 characters in the range 0x21 to 0x7E, which uniquely identifies a messages within a mailbox and persists across sessions.

Chilkat Lianja Extension Download Chilkat Lianja Extension

// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

loMailman = createobject("CkMailMan")

loMailman.MailHost = "pop.example.com"

loMailman.PopUsername = "myLogin"
loMailman.PopPassword = "myPassword"

loMailman.MailPort = 995
loMailman.PopSsl = .T.

loSa = loMailman.GetUidls()
if (loMailman.LastMethodSuccess = .F.) then
    ? loMailman.LastErrorText
    release loMailman
    return
endif

// Download each email by UIDL.

i = 0
lnNumUidls = loSa.Count
do while i < lnNumUidls
    lcUidl = loSa.GetString(i)
    ? lcUidl
    i = i + 1
enddo

release loSa


release loMailman