111,095
社区成员
发帖
与我相关
我的任务
分享在.net中不能使用jmail吗？高分求救！
我用的是c#，但是总是提示错误：
This function is not included in this version of jmail.
jmail.POP3 JPP3;
JPp3=new jmail.POP3Class();
行 66： jmail.Messages JMsg=new jmail.Messages();
行 67： JPp3.Connect(username.Text,password.Text,pop3.Text,110);
执行到第66行时出错，，怎么回事啊？？？
This function is not included in this version of jmail.
jmail.POP3 JPP3;
JPp3=new jmail.POP3Class();
行 66： jmail.Messages JMsg=new jmail.Messages();
行 67： JPp3.Connect(username.Text,password.Text,pop3.Text,110);
执行到第66行时出错，，怎么回事啊？？？
...全文
请发表友善的回复…
发表回复
sk9979 2003-04-17
- 打赏
- 举报
http://expert.csdn.net/Expert/topic/1640/1640982.xml?temp=.128338
sk9979 2003-04-17
- 打赏
- 举报
http://expert.csdn.net/Expert/topic/1649/1649366.xml?temp=8.164614E-02
myschevon 2003-04-17
- 打赏
- 举报
各位不要拿一些没有解决的帖子来发表，并且这些我都已经看过了，
gordenfl 2003-04-17
- 打赏
- 举报
jmail是个什么东东阿！！！！！！！！！！！！
myschevon 2003-04-16
- 打赏
- 举报
but this is jmail for web service ,
how can I doing with web application?
how can I doing with web application?
qieyj 2003-04-16
- 打赏
- 举报
下面代码是利用Jmail发送、接收邮件代码的一个原形，
以下是两个WEB Service 方法
'发送Email
<WebMethod()> Public Function Jmail_Send(ByVal fromEmailAddress As String, _
ByVal toEmailAddress As String, _
ByVal ccEmailAddress As String, _
ByVal bccEmailAddress As String, _
ByVal subject As String, _
ByVal body As String, ByVal MailServer As String) As Boolean
Dim email As New jmail.Message()
email.Logging = True
email.Silent = True
' email.MailServerUserName = "" 'smtp服务器用户名
' email.MailServerPassWord = "" 'smtp服务器密码
email.From = fromEmailAddress
email.Subject = subject
email.Body = body
email.AddRecipient(toEmailAddress)
If email.Send(MailServer) Then
Return True
Else
Return False
End If
End Function
'接收Email
<WebMethod()> Public Function Jmail_Receivemail(ByVal UserName As String, _
ByVal Password As String, ByVal MailServer As String) As Boolean
Dim email As New jmail.POP3()
Dim MSG As New jmail.Message()
email.Connect(UserName, Password, MailServer, 110)
If email.Count() > 0 Then
MSG = email.Messages.Item(1)
Debug.Write(MSG.FromName)
Debug.Write(MSG.Subject)
Debug.Write(MSG.Date)
Debug.Write(MSG.Body)
Return True
End If
email.Disconnect()
End Function
以下是两个WEB Service 方法
'发送Email
<WebMethod()> Public Function Jmail_Send(ByVal fromEmailAddress As String, _
ByVal toEmailAddress As String, _
ByVal ccEmailAddress As String, _
ByVal bccEmailAddress As String, _
ByVal subject As String, _
ByVal body As String, ByVal MailServer As String) As Boolean
Dim email As New jmail.Message()
email.Logging = True
email.Silent = True
' email.MailServerUserName = "" 'smtp服务器用户名
' email.MailServerPassWord = "" 'smtp服务器密码
email.From = fromEmailAddress
email.Subject = subject
email.Body = body
email.AddRecipient(toEmailAddress)
If email.Send(MailServer) Then
Return True
Else
Return False
End If
End Function
'接收Email
<WebMethod()> Public Function Jmail_Receivemail(ByVal UserName As String, _
ByVal Password As String, ByVal MailServer As String) As Boolean
Dim email As New jmail.POP3()
Dim MSG As New jmail.Message()
email.Connect(UserName, Password, MailServer, 110)
If email.Count() > 0 Then
MSG = email.Messages.Item(1)
Debug.Write(MSG.FromName)
Debug.Write(MSG.Subject)
Debug.Write(MSG.Date)
Debug.Write(MSG.Body)
Return True
End If
email.Disconnect()
End Function
mooncat2000 2003-04-16
- 打赏
- 举报
我实在不懂你为什么要这么做呢
