asppop3 eksempel

Og du har kigget på søgeresultatet fra Google ud over ServerObjects egen side?

  http://www.google.com/search?q=asppop3

De herligste hilsner, Claus Sørensen

<%
  'Open a connection to the POP3 server
  Dim Mailer
  Set Mailer = Server.CreateObject("POP3svg.Mailer")
  Mailer.RemoteHost = "pop3.foo.com"
  Mailer.UserName  = "username"
  Mailer.Password  = "password"
  Mailer.OpenPop3

  'Find out how many messages there are
  Dim iMessages
  iMessages = Mailer.MessageCount
  Response.Write "There are " & iMessages & " messages on the server.<p>"

  Dim iLoop

  'Display the table
  Response.Write "<table border=1 align=center cellspacing=1>"
  Response.Write "<tr><th>&nbsp;</th><th>Subject</th><th>From</th></tr>"

  'Loop through all of the available messages
  For iLoop = 1 to iMessages
    If Mailer.Retrieve(iLoop) then
      Response.Write "<tr>"
      Response.Write "<td><a href=""readMessage.asp?ID=" & _
                    iLoop & """>Read</a></td>"
      Response.Write "<td>" & Mailer.Subject & "</td>"
      Response.Write "<td>" & Mailer.FromName & " (<a href=""mailto:""" & _
                    Mailer.FromAddress & """>" & Mailer.FromAddress & _
                    "</a>)</td>"
      Response.Write "</tr>"
    End If
  Next 'iLoop

  Response.Write "</table>"

  'Close the connection to the POP3 server
  Mailer.ClosePop3
%>


for at læse mail fx message.asp:
<%
  'Open a connection to the POP3 server
  Dim Mailer
  Set Mailer = Server.CreateObject("POP3svg.Mailer")
  Mailer.RemoteHost = "pop3.foo.com"
  Mailer.UserName  = "username"
  Mailer.Password  = "password"
  Mailer.OpenPop3

  'Retrieve the specific message
  If Mailer.Retrieve(Request("ID")) Then
    Response.Write "<b>Subject</b>: " & Mailer.Subject & "<br>"
    Response.Write "<b>Body</b>: <pre>" & _
                  Server.HtmlEncode(Mailer.BodyText) & "</pre><br>"
  Else
    Response.Write "Message " & Request("ID") & " could not be found..."
  End If

  'Close the connection
  Mailer.ClosePop3
%>

vh Hossein

Hossein > Jeg ved ikke lige hvad der sker - men den viser ikke nogen mails

OK! kig på det:
http://www.4guysfromrolla.com/ASPscripts/PrintPage.asp?REF=/webtech/092201-1.shtml

hmm... ja - den skriver:

There are 2 messages on the server.

Men den viser ikke nogen mails... Ret mærkligt!

tak for eksemplet.

jeg har samme problem... selvom jeg kopiere hele scriptet ind, kan jeg ikke læse mails'ne