|
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 Mail Headers
This ASP script shows how to read email headers (summary information) from an IMAP server. <html>
<head>
<title>IMAP Fetch Headers</title>
</head>
<body>
<%
' ASP Script to Read IMAP Email Headers
set imap = Server.CreateObject("Chilkat.Imap")
' Any value passed to UnlockComponent begins the 30-day trial.
unlocked = imap.UnlockComponent("30-day trial")
if unlocked then
' Connect to the IMAP server and login
' Returns 0 if failed, but for the example we are not handling it.
' Extended error information is available in the
' imap.LastErrorHtml property
success = imap.Connect("localhost")
success = imap.Login("chilkat","chilkat")
' Select a mailbox for reading.
success = imap.SelectMailbox("Inbox")
' Get all the messages
Set msgSet = imap.Search("ALL", 1)
' Fetch all the mail into a bundle object.
Set bundle = imap.FetchHeaders(msgSet)
' Loop over the bundle and display the From and Subject.
Response.write "<table>"
For i = 0 To bundle.MessageCount - 1
Set email = bundle.GetEmail(i)
Response.write "<tr>"
Response.write "<td>" & Left(email.FromName,40) & "</td>"
Response.write "<td>" & email.FromAddress & "</td>"
Response.write "<td>" & email.LocalDate & "</td>"
Response.write "<td>" & Left(email.Subject, 40) & "</td>"
Response.write "<td>" & email.NumAttachments & "</td>"
Response.write "</tr>"
Next
Response.write "</table>"
imap.Logout
imap.Disconnect
end if
%>
</body>
</html>
|
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.
