Ureader.com  
Microsoft software help and Community
   home   |   control panel login   |   archive   |  
 
inet
active_desktop
active_scrptng
asp.components
asp.db
asp.general
comctl32
comp.packaging
components.dev
dbweb
dhtml_editing
docobjects
html_authoring
html_objmodel
iis
iis.ftp
iis.security
iis.smtp_nntp
indexserver
misc
mshtml_hosting
scripting.jscript
scripting.vbscript
sdk_setup
shell_objmodel
urlmonikers
webbrowser_ctl
wininet
  
 
date: 31 Jul 2005 07:51:55 -0700,    group: microsoft.public.inetserver.asp.components        back       


ASPPop3 (Server Objects) fails to return email details   
Can anyone tell me why this code doesn't work?  The original came from
an example in this group, but was modified slightly when the original
failed to return message details.

I am able to connect to the server and see the number of messages on
the server, but message details (sender, subject, body, etc.) are not
returned.

_______________
  Dim Mailer
  Set Mailer = Server.CreateObject("POP3svg.M­ailer")
  Mailer.RemoteHost = "mail.xxxx.com"
  Mailer.UserName   = "test@xxxx.com"
  Mailer.Password   = "pwd"
  Mailer.OpenPop3
  Dim iMessages
  iMessages = Mailer.MessageCount
  Response.Write "There are " & iMessages & " messages on the
server.<p>"

  Dim iLoop

  Response.Write "<table border=1 align=center cellspacing=1>"
  Response.Write
"<tr><th> </th><th>Subjec­t</th><th>From</th></tr>"

  For iLoop = 1 to iMessages
   'If Mailer.Retrieve(iLoop) then
      Mailer.Retrieve iloop

      Response.Write "<tr>"
      Response.Write "<td>" & Mailer.Subject & "</td>"
      Response.Write "<td>" & Mailer.FromName & "</td>"
      Response.Write "</tr>"
   'End If

  Next 

  Response.Write "</table>" 

  Mailer.ClosePop3
date: 31 Jul 2005 07:51:55 -0700   author:   Rich_C

Google
 
Web ureader.com


    COPYRIGHT 2007, YARDI TECHNOLOGY LIMITED, ALL RIGHT RESERVE  |   contact us