風箏

簡單的Sample Code
<%        set Mail = Server.CreateObject("CDONTS.NewMail")
Mail.BodyFormat = 0
Mail.MailFormat = 0
Mail.From = "寄件者"
Mail.To = "收件者"
Mail.Subject = "主旨"
Mail.body ="內容"
Mail.Send
Set Mail=Nothing
%>
功能較多的Sample Code
<%Set email = Server.CreateObject("CDO.Message")
email.From ="寄件者"
email.To ="收件者"
email.Subject ="主旨"
email.HtmlBody ="內容"
email.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
email.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "127.0.0.1"  'SMTP Server
email.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
email.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
email.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "帳號"
email.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "密碼"
email.Configuration.Fields.Update
email.Send
Set email = nothing
%>
mail 物件介紹