Jmail如何接收邮件

[zyhtz]

Jmail如何接收邮件
会用Jmail发送邮件了，论坛上也有许多这样的例子
但关于收邮件的例子就没了，所以无从入手
希望大家帮忙一下，给点例子
应该如何用Jmail去接收邮件

[真相重于对错]

我刚才试了一下jmail4.4 专业版可以收发邮件，使用jmail.pop3class
例子：
jmail.pop3class p3 = new jmail.pop3class();
p3.connect("username","password","mail.domain.org",110);
for( int i=1 ; i<p3.count ; i++ )
{
jmail.message msg = p3.Messages[i];
}
p3.disconnect();
没有问题

[xu0923]

Dim ReCC As String = ""
Dim pop3 As New POP3()
Dim msg As New Message()
Dim separator As String = ", "
Dim Attachments As New Attachments()
Dim re As New Recipient()
Dim ReTo As String = ""

Try
POP3.Connect('UserName','PassWord', 'POP3')
Catch
Page.RegisterStartupScript("", "<script language=JavaScript>window.alert('连接错误!!');</script>")
End Try

msg = POP3.Messages.Item(1)

Dim Recipients As New Recipients()
Recipients = msg.Recipients


Dim i As Integer
For i = 0 To Recipients.Count - 1
If i = Recipients.Count - 1 Then
separator = ""
End If

re = Recipients.Item(i)
If re.ReType = 0 Then
ReTo = ReTo & re.Name & " <a href=""mailto:" & re.EMail & """>" & re.EMail & "</a>" & separator
Else
ReCC = ReTo & re.Name & " <a href=""mailto:" & re.EMail & """>" & re.EMail & "</a>" & separator
End If
Next

Me.tabConcent.Rows(0).Cells(1).InnerHtml = "<" & msg.FromName & ">" & " (<a href=""mailto:" & msg.From & """>" & msg.From & "</a>)" & separator
Me.tabConcent.Rows(0).Cells(3).InnerHtml = ReTo
Me.tabConcent.Rows(1).Cells(1).InnerHtml = msg.Subject
Me.tabConcent.Rows(1).Cells(3).InnerHtml = msg.Date
Me.tabConcent.Rows(2).Cells(1).InnerHtml = getAttachments()
Me.tabConcent.Rows(3).Cells(0).InnerHtml = "<pre>" & vbCrLf _
& msg.Body & vbCrLf _
& "</pre>"


Function getAttachments() As String
Attachments = msg.Attachments
separator = ", "
Dim i As Integer
For i = 0 To Attachments.Count - 1
If i = Attachments.Count - 1 Then
separator = ""
End If
Dim at As New Attachment()
at = Attachments(i)
getAttachments = getAttachments & "<a href=""getAttachment.aspx?ai=" & i.ToString & "&eid=" & Request.QueryString("id") & """ target=""_blank"">" & _
at.Name & "(" & at.Size & " bytes)" & "</a>" & " "
Next
End Function

附件的函数我也在学习,不知道怎么样实现点击让用户自动下载附件

[andrawsky]

up

[真相重于对错]

接收邮件可以使用,cdo

[guoqd]

jmail4.4哪裡有下，謝謝

[zyhtz]

再顶一下
大家再说说看啊

[netvsj2ee]

http://expert.csdn.net/Expert/topic/2973/2973263.xml?temp=.4418604