使用ASP发送电子邮件

分享于 

1分钟阅读

Web开发

  繁體 雙語

介绍

本文展示了如何使用CDONTS组件从ASP页面发送电子邮件。

代码片段


Sub send_email(email_from, email_to, email_subject, email_body)


 Dim Newmail


 Set Newmail = server.CreateObject ("cdonts.newmail")



 Newmail.BodyFormat = 0


 Newmail.MailFormat = 0


 Newmail.From = email_from


 Newmail.To = email_to


 Newmail.Subject = email_subject


 Newmail.Body = email_body


 Newmail.Send



 Set Newmail = Nothing 


End Sub




要调用该过程:

Call send_email("from@domain.com","to@domain.com","Subject","Body")



如果使用CDONTS的任何困难,最常见的是在IIS上配置SMTP服务。 这个简单而强大的组件不可能出现什么问题。