[p][br] [br]?? [br][br][br]??? [br]????? [br]??? [br]??? [br]????? [br]????? [br]????? [br]????? [br]????? [br]??? [br]??? [br]?

asp通过jmail组件读取邮件列表
邮箱：[br]????????? [br]??????????? 163邮箱[br]??????????? 126邮箱[br][br]?????	邮箱的登录名：[br]?????	邮箱的登录密码：[br]?????	日期：[br]?????

[br]? [br]????? [br]????? [br]????? [br]????? [br]????? [br]????? [br]????? [br]??? [br]<%[br]if request.form("submit")<>"" then[br]pop3server=request.form("pop3server")[br]uid=request.form("uid")[br]upwd=request.form("upwd")[br]riqi=cdate(request.form("riqi"))[br]set pop3 = server.createobject( "jmail.pop3" )[br]pop3.connect uid, upwd, pop3server?? [br]'response.write( "你有" & pop3.count & " 封邮件。

" ) [br]'set msg=server.createobject("jmail.message")[br]function getattachments() '获得附件[br]?if attachments.count>0 then[br]?? set attachments = msg.attachments[br]??getattachments = attachments(0).name & "(" & attachments(0).size & " bytes)"[br]?else[br]?getattachments=""[br]?end if[br]? end function?? [/p]
[p]for i=1 to pop3.count[br]?set msg = pop3.messages.item(i)[br]?set attachments = msg.attachments[br]?if cdate(msg.date)>=riqi then%>[br]??? [br]????? [br]????? [br]????? [br]????? [br]????? [br]????? [br]??? [br]? <%end if[br]? next[br]? pop3.disconnect [br]end if%> [br]

序号	日期	邮件标题	发件人	附件	内容
<%= i %>	<%= msg.date %>	<%= msg.subject %>	<%= msg.fromname %>	<%= getattachments %>	<%'=left(msg.body,50) %>

[br]? [br]? [/p]