(Lianja) Read POP3 Mail Headers
Reads the header for each email in a POP3 mailbox and display the FROM and SUBJECT header fields.
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
// The mailman object is used for receiving (POP3)
// and sending (SMTP) email.
loMailman = createobject("CkMailMan")
// Set the POP3 server's hostname
loMailman.MailHost = "pop.someMailServer.com"
// Set the POP3 login/password.
loMailman.PopUsername = "****"
loMailman.PopPassword = "****"
// Read mail headers and one line of the body.
loBundle = loMailman.GetAllHeaders(1)
if (loMailman.LastMethodSuccess = .F.) then
? loMailman.LastErrorText
release loMailman
return
endif
i = 0
do while i < loBundle.MessageCount
loEmail = loBundle.GetEmail(i)
// Display the From email address and the subject.
? "From: " + loEmail.From
? "Subject: " + loEmail.Subject
release loEmail
i = i + 1
enddo
release loBundle
release loMailman
|