寻网站建设老师指点，碰到一个功能不知道怎么设置

来源：百度知道 编辑：UC知道 时间：2024/05/05 06:42:53
各位老师好，我建设的是分类信息网，第一种是会员发布信息，第二种不是会员也可以直接发布信息，想设置成不是会员直接发布信息成功后，给留下的邮箱地址自动回复一个发布本信息具体网址的邮件，以便发布人修改发布的本信息，开发语言是asp+access，先谢谢各位老师了

用jmail组件
给你个函数

'Jmail邮件发送(二)
function SendMailto(emailSMTP,HOPE_send,HOPE_sendname,HOPE_Servername,HOPE_ServerPwd,cname,cemail,emailtitle,emailcontant)
on error resume next
'^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
'cname 收件人的姓名
'cemail 收件人的Email
'emailtitle 收件人的标题
'emailcontant 收件人的内容

'emailSMTP 发送者的SMTP服务器
'HOPE_send 发送者地址
'HOPE_sendname 发送者的姓名
'HOPE_Servername 发送者的用户名
'HOPE_ServerPwd 发送者的密码
'^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Set JMail = Server.CreateObject("JMail.Message")
'是否将信头编码成iso-8859-1字符集. 缺省是True
JMail.ISOEncodeHeaders = True
'如果JMail.silent设置为true,ErrorCode包含的是错误代码
JMail.Silent = True
'设置标题和内容编码，如果标题有中文，必须设定编码为gb2312
JMail.Charset = "