??


???
?????
???
???
?????
?????
?????
?????
?????
???
???
?

asp通過jmail組件讀取郵件列表
郵箱： ????????? ??????????? 163郵箱 ??????????? 126郵箱 ?????	郵箱的登錄名： ?????	郵箱的登錄密碼： ?????	日期： ?????

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

" )
'set msg=server.createobject("jmail.message")
function getattachments() '獲得附件
?if attachments.count>0 then
?? set attachments = msg.attachments
??getattachments = attachments(0).name & "(" & attachments(0).size & " bytes)"
?else
?getattachments=""
?end if
? end function??

for i=1 to pop3.count
?set msg = pop3.messages.item(i)
?set attachments = msg.attachments
?if cdate(msg.date)>=riqi then%>
???

?????
?????
?????
?????
?????
?????
???
? <%end if
? next
? pop3.disconnect
end if%>

序號	日期	郵件標題	發(fā)件人	附件	內(nèi)容
<%= i %>	<%= msg.date %>	<%= msg.subject %>	<%= msg.fromname %>	<%= getattachments %>	<%'=left(msg.body,50) %>

?
?