Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
Read Email Headers
VB.NET sample code to read mail headers from a POP3 server. textBox1.Text = "" ' Create a mailman object for reading email. Dim mailman As New Chilkat.MailMan() ' Any string passed to UnlockComponent automatically begins a 30-day trial. Dim success As Boolean success = mailman.UnlockComponent("Hello World") If (success <> true) Then MsgBox(mailman.LastErrorText) Exit Sub End If ' Set our POP3 hostname, login and password mailman.MailHost = "mail.chilkatsoft.com" mailman.PopUsername = "login" mailman.PopPassword = "password" ' Connecting via SSL is possible by adding these lines: ' All POP3 communications are secure using SSL. 'mailman.PopSsl = true; ' Set the POP3 port to 995, the standard MS Exchange Server SSL POP3 port. 'mailman.MailPort = 995; ' Use GetAllHeaders to fetch each email header and the 1st N lines of ' the body from a POP3 server. ' Note: Attachment information will not be available. This is a shortfall ' of the POP3 protocol because attachment information is not included ' in POP3 headers. An entire POP3 email must be read in order to get complete ' attachment information. Dim bundle As Chilkat.EmailBundle = mailman.GetAllHeaders(2) ' Get 2 body lines... If bundle Is Nothing Then MessageBox.Show(mailman.LastErrorText) Return End If Dim i As Integer Dim n As Integer = bundle.MessageCount For i = 0 To n - 1 Dim email As Chilkat.Email = bundle.GetEmail(i) textBox1.Text = textBox1.Text + email.From + ControlChars.Cr + ControlChars.Lf textBox1.Text = textBox1.Text + email.Subject + ControlChars.Cr + ControlChars.Lf Next i |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.