ASP发确认邮件
来源:百度知道 编辑:UC知道 时间:2024/05/15 07:12:46
HOST必须装有JMAIL组件.
function send_Mail(SenderName,serveraddress,Charset,Subject,body,sender,AddRecipient,ContentType)
set jmail=server.CreateObject("JMail.SMTPMail")
jmail.Priority=3
jmail.SenderName=SenderName
' jmail.serveraddress=serveraddress
jmail.Charset=Charset
jmail.subject=Subject
jmail.body=body
jmail.sender=sender
jmail.AddRecipient(AddRecipient)
jmail.ContentType=ContentType
jmail.Execute
set jmail=nothing
end function
=====================================================调用
success_url = trim(request("backto")) '发送成功后转到
mailFrom = trim(request("from")) '发件人
mailTo = trim(request("to")) '收件人
mailSubject = trim(request("subject")) '主题
mailBody = trim(request("body") ) '信体
call send_mail(mailFrom,"cohell.net:25[这个是JM