|
JMail是目前功能最齐全、稳定及高效的邮件发送组件,我们的Windows系列空间服务器均装有些组件。以下为利用该组件进行邮件发送的示例:
例子一:
<%
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = "sales@abc.com"
'此为您邮箱的登录帐号,使用时请更改为自己的邮箱登录帐号
msg.MailServerPassword = "56789"
'此为您邮箱的登录密码,使用时请更改为自己的邮箱登录密码
msg.From = "sales@abc.com"
'发件人Email
msg.FromName = "某某公司"
'发件人姓名
msg.AddRecipient "tech@abc.com"
'收件人Email
msg.Subject = "Jmail发送测试"
'邮件主题
msg.Body = "这是由Jmail组件发送的邮件!"
'邮件正文
msg.Send ("mail.abc.com")
'SMTP服务器地址
msg.close()
set msg = nothing
%>
例子二:
<%
name=request.form("name")
email=request.form("email")
note=request.form("note")
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "gb2312"
msg.MailServerUserName = "sales@abc.com"
'此为您邮箱的登录帐号,使用时请更改为自己的邮箱登录帐号
msg.MailServerPassword = "56789"
'此为您邮箱的登录密码,使用时请更改为自己的邮箱登录密码
msg.From = email
'发件人Email
msg.FromName = name
'发件人姓名
msg.AddRecipient "tech@abc.com"
'收件人Email
msg.Subject = "Jmail发送测试"
'邮件主题
msg.Body = "这是由"&name&"提交的订单,订单内容为"¬e&""
'邮件正文
msg.Send ("mail.abc.com")
'
SMTP服务器地址
msg.close()
set msg = nothing
%>
如果您是我司的空间用户,在使用过程中,如果您碰到任何疑问,可发信到tech@chinadds.com,我们的技术人员会尽力为您解决。 |