注册 登录
编程论坛 ASP技术论坛

关于asp用Jmail发邮件带附件问题

hwc201411 发布于 2010-09-17 21:05, 1407 次点击
我用Jmail发送邮件,但是不懂怎么附带附件,附件是word文档。
我用2个文件一个是表单就是填写内容之类还有附带附件
下面就是Jmail代码
<%
'On error resume next
Set JMail = Server.CreateObject("JMail.Message")
JMail.Charset = "gb2312" ' 邮件字符集,默认为"US-ASCII"
JMail.From = "****@ ' 发送者邮箱地址,也就是你自己的发件邮箱!
JMail.FromName = request("fname")  ' 发送者姓名
JMail.Subject = request("content") ' 邮件主题
' 身份验证
JMail.MailServerUserName = "hwc2***" ' 身份验证的用户名,只写@163前面的那个帐号,不包括@以后的部分!
JMail.MailServerPassword = "******" ' 身份验证的密码,163邮箱密码!
' 设置优先级,范围从1到5,越大的优先级越高,3为普通
JMail.Priority = 3
JMail.AddRecipient("QQ@)
JMail.Body =request("content") & request("fname") & request("femail")
JMail.Send("smtp.)
JMail.Close()' 关闭并清除对象
Set JMail = Nothing
if err.number<>0 then
Response.write "<script>alert('抱歉,邮件发送失败!');</script>"
Response.write "<script>history.go(-1);</script>"
else
Response.write "<script>alert('恭喜!邮件发送成功!');</script>"
Response.write "<script>history.go(-1);</script>"
end if
%>
5 回复
#2
gupiao1752010-09-17 21:26
JMail.AddRecipient("QQ@)
content = JMail.AddAttachment (Server.MapPath("1.gif"), True)'附件1.gif必须和你的发件文件在同一个目录下!
JMail.Body =request("content") & request("fname") & request("femail")
中间那句就是发附件的方法!
#3
gupiao1752010-09-17 21:33
Server.MapPath("1.gif"),doc文件也是一个道理,Server.MapPath("1.doc")
#4
hwc2014112010-09-18 10:46
回复 3楼 gupiao175
但是我附件的值是变量,从表单上传到文件里面,怎么获取这个值呢
#5
yms1232010-09-18 15:58
先上传到服务器再获取即可
#6
gupiao1752010-09-18 17:09
ASP上传后都有一个路径,这个路径,不就对应了
filepath就是文件上传路径变量
JMail.AddAttachment (Server.MapPath(filepath), True)
1