Burak ŞİMŞEK - Kişisel İnternet Sitesi - Ücretsiz BŞ & UWN Scriptleri

  • Increase font size
  • Default font size
  • Decrease font size

ASP İle E-Posta Göndermek

E-posta Yazdır

ASP ile e-posta (e-mail) göndermek çok basit bir işlem olup, sunucunuzdaki e-posta bileşen desteğine göre sizde o kodu yazmalısınız. Aşağıda vereceğimiz örnekte CDOSYS bileşeni kullanılmaktadır.

Aşağıdaki kodda metin olarak e-posta gönderebilirsiniz.

<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Konuyu Yazınız"
myMail.From="E-Mail Adresinizi Yazınız"
myMail.To="Alıcının E-Mail Adresini Yazınız"
myMail.TextBody="Mesaj İçeriğini Yazınız."
myMail.Send
set myMail=nothing
%>

Bir diğer yöntem kullanarak; aşağıdaki kodda metin olarak ve BCC, CC kullanarak e-posta gönderebilirsiniz.

<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Konuyu Yazınız"
myMail.From="E-Mail Adresinizi Yazınız"
myMail.To="Alıcının E-Mail Adresini Yazınız"
myMail.Bcc="E-Mail Adresi Yazınız"
myMail.Cc="E-Mail Adresi Yazınız"
myMail.TextBody="Mesaj İçeriğini Yazınız."
myMail.Send
set myMail=nothing
%>

Bir diğer yöntem kullanarak; html olarak e-posta gönderebilirsiniz.

<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Konuyu Yazınız"
myMail.From="E-Mail Adresinizi Yazınız"
myMail.To="Alıcının E-Mail Adresini Yazınız"
myMail.HTMLBody = "<h1>Mesaj İçeriğini Yazınız.</h1>"
myMail.Send
set myMail=nothing
%>