如何用POP3接收电子邮件？

<%  set pop3 = server.createobject( "jmail.pop3" )

  pop3.connect "username", "password", "pop3mail.intels.net"
  ' pop3的连接用户名,密码,pop3地址.

  response.write( "你现在有" & pop3.count & " 封邮件。
" )

  if pop3.count > 0 then
    set msg = pop3.messages.item(1)   
    reto = ""
    recc = ""

    set recipients = msg.recipients
    separator = ", "

    for i = 0 to recipients.count - 1
        if i = recipients.count - 1 then
            separator = ""
        end if

        set re = recipients.item(i)
        if re.retype = 0 then
            reto = reto & re.name & "(" & re.email & ")" &
separator
        else
            recc = reto & re.name & "(" & re.email & ")" & separator
        end if
    next
   ' 以上获取所有收件人,并存储.

    function getattachments()
          set attachments = msg.attachments
          separator = ", "

          for i = 0 to attachments.count - 1
            if i = attachments.count - 1 then
                separator = ""
            end if

            set at = attachments(i)
            at.savetofile( "c:\intels\email\attachments\" & at.filename )
            getattachments = getattachments & "" &_
                                at.filename & "(" & at.size  & " bytes)" & "" & separator
          next
    end function

' 以上是程序得到附件,并保存到服务器上,也可返回附件链接.

    %>   
   
     
       

         
           
           
         
         
           
           
         
         
           
           
         
         
           
           
         
         
           
           
         
         
           
           
                 
       

主题:撼雪喷云向你问好!	<%= msg.subject %>
发件人:李雁冰@163.net	<%= msg.fromname %>
收件人:宋颜浩@163.net	<%= reto %>
抄送:申朝阳@163.net	<%= recc %>
附件:随风起舞的传说	<%= getattachments %>
内容:乌里哇啦乌里哇啦……	<%= msg.body %>

     

<%  end if
  pop3.disconnect
%>

[1]