1.下载Jmail4.3放置c盘中注册,以下是注册成功的图片:
![](https://p-blog.csdn.net/images/p_blog_csdn_net/zhangyejun1984/3.bmp)
2.将以下源码放置于我的asp网站中运行,并获得运行成功的窗口:
<
%
'
参数说明
'
Subject : 邮件标题
'
MailAddress : 发件服务器的地址,如smtp.163.com
'
Email : 收件人邮件地址
'
Sender : 发件人姓名
'
Content : 邮件内容
'
Fromer : 发件人的邮件地址
Sub
SendAction(subject, mailaddress, email, sender, content, fromer)
Set
jmail
=
Server.CreateObject(
"
JMAIL.SMTPMail
"
)
'
创建一个JMAIL对象
jmail.silent
=
true
'
JMAIL不会抛出例外错误,返回的值为FALSE跟TRUE
jmail.logging
=
true
'
启用使用日志
jmail.Charset
=
"
GB2312
"
'
邮件文字的代码为简体中文
jmail.ContentType
=
"
text/html
"
'
邮件的格式为HTML的
jmail.ServerAddress
=
mailaddress
'
发送邮件的服务器
jmail.AddRecipient Email
'
邮件的收件人
jmail.SenderName
=
sender
'
邮件发送者的姓名
jmail.Sender
=
fromer
'
邮件发送者的邮件地址
jmail.Priority
=
1
'
邮件的紧急程序,1 为最快,5 为最慢, 3 为默认值
jmail.Subject
=
subject
'
邮件的标题
jmail.Body
=
content
'
邮件的内容
'
由于没有用到密抄跟抄送,这里屏蔽掉这两句,如果您有需要的话,可以在这里恢复
'
jmail.AddRecipientBCC Email '密件收件人的地址
'
jmail.AddRecipientCC Email '邮件抄送者的地址
jmail.Execute()
'
执行邮件发送
jmail.Close
'
关闭邮件对象
response.Write(
"
succeed
"
)
End Sub
'
调用此Sub的例子
Dim
strSubject,strEmail,strMailAdress,strSender,strContent,strFromer
strSubject
=
"
这是一封用JMAIL发送的测试邮件
"
strContent
=
"
JMail组件发送测试成功!
"
strEmail
=
"
zhangyejun1984@sina.com
"
strFromer
=
"
zhangyejun1984@163.com
"
strMailAddress
=
"
smtp.163.com
"
![](https://i-blog.csdnimg.cn/blog_migrate/6810355c2f78c12e91b7997a8e8c583a.gif)
Call
SendAction (strSubject,strMailaddress,strEmail,strSender,strContent,strFromer)
'
参数说明
'
Subject : 邮件标题
'
MailAddress : 发件服务器的地址,如smtp.163.com
'
Email : 收件人邮件地址
'
Sender : 发件人姓名
'
Content : 邮件内容
'
Fromer : 发件人的邮件地址
%
>
![](https://p-blog.csdn.net/images/p_blog_csdn_net/zhangyejun1984/4.bmp)
3.打开邮件却没有发现该邮件。。。请问哪里出了问题?本人机器连着INTERNET,是否要开花生壳?
以前用asp写了一个网站,用mailto提取表格内容实现自动调用outlook自动填写邮件内容功能,但是mailto没有附件功能,每次手动加附件感觉很麻烦,jmail能实现自动添加附件,这两天找了一些jmail的很多入门的代码,但在网站上找不到jmail的视频和图片教程。自己调试没有发送成功的。请达人指点:)