Asp Email, Mail Formlar aracılığı ile e mail gönderimi sağlayan bir bileşendir.
<%
On Error Resume Next
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.gonderen.com" ' gönderen sunucu
Mail.From = "gonderen@adresi.com" ' Specify sender's address
Mail.FromName = "Gönderen Adı" ' Specify sender's name
Mail.AddAddress "alıcı@adresi.com", "Alıcı Adı"
'Mail.AddAddress "ikincialıcı@adresi.com"
'Mail.AddReplyTo "kopyaalıcı@adresi.com"
'Mail.AddAttachment "c:\images\ek.jpg"
Mail.Subject = "Mesaj Konusu"
Mail.Body = "Mesaj"
Mail.Send
If err Then
Response.Write "Mesajınız Gönderilmedi..."
Response.Write err.Description
Else
Response.Write "Mesaj Gönderildi."
End If
%>
<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.gonderenserver.com"
Mail.Username = "gonderen@adresi.com"
Mail.Password = "sifre"
Mail.From = "gonderen@adresi.com"
Mail.FromName = "Gonderen Adı"
Mail.AddAddress "alıcı@adresi.com"
Mail.Subject = "Konu"
Mail.Body = HTML
Mail.IsHTML = True
Mail.Send
%>