E-posta bileşenlerinin kullanımı

rebel_

Banned
Katılım
28 Ağu 2006
Mesajlar
88
Reaction score
0
Puanları
0
Yaş
36
E-posta bileşenlerinin kullanımı

Bu rehber içerisinde 3 adet popüler e-posta bileşeninin kullanımıyla ilgili bilgileri size vereceğiz. Kırmızı ile belirttiğimiz alanları kendi sunucu bilgilerinize göre düzenlemeniz gerekmektedir.

Cdonts:
Cdonts çalıştırılması en kolay eposta bileşenlerinden biridir.Sunucunuz Cdonts’u destekliyorsa, sorun çekmeden bu bileşeni kullanmanız mümkün.
form.html:
<html>
<body bgcolor="#FFFFFF">

<form method=post action="gonder.asp">
Adınız : <input type="text" name="ad"><br>
E-mail adresiniz : <input type="text" name="email"><br>
Mesajınız : <textarea name="mesaj" rows="" cols=""></textarea><br>
<input type="submit" value="gonder">
</form>

</body>
</html>
gonder.asp:
<%
ad=trim(Request.form("ad")) 'form dan alınan ad
email=Request.Form("email") 'form dan alynan e-mail adresi
mesaj=Request.Form("mesaj")’form dan alınan mesaj

Set Email = Server.CreateObject("CDONTS.NewMail")
Email.From="[email protected]" 'gonderenin adresi
Email.to="[email protected]" ’mailın size ulaşmasını bu satır saglayacak
Email.Subject=Konu
Email.Body=mesaj ‘mailin icerigi
Email.send ’maili yollama komutu
‘Bu ikisinden birini seçmek size kalmış.
response.redirect "http://www.domainadi.com/yollandi.asp"
‘response.write "form gönderildi"
%>
________________________________________
Jmail:
form.html:
<html>
<body bgcolor="#FFFFFF">

<form method=post action="gonder.asp">
Adınız : <input type="text" name="ad"><br>
E-mail adresiniz : <input type="text" name="email"><br>
Mesajınız : <textarea name="mesaj" rows="" cols=""></textarea><br>
<input type="submit" value="gonder">
</form>

</body>
</html>
gonder.asp:
<%
adi=trim(Request.form("ad")) 'form dan alınan isim
email=Request.Form("email") 'form dan alynan adres
mesaj=Request.Form("mesaj") ‘ form dan alınan mesaj

Set email = Server.CreateObject("JMail.Message")
email.ContentType = "text/html"
email.Charset = "ISO-8859-9"

email.AddRecipient email
email.from = “[email protected]” ‘ mailı yollayacak olan adres
email.fromname = "Yollayanın adı: "&ad &” "
email.MailServerUserName = “[email protected]” ‘ buraya e-posta sunucunuzun kullanıcı adını girmelisiniz.
email.MailServerPassWord = "sifreniz" ‘ buraya kullandığınız e-posta adresinin şifresini girmelisiniz.
email.Subject = "Mailın konusu”
email.body = mesaj
email.Send("mail.domainadi.com")

if err then
response.Write err.Description & "<br>Form gönderilemedi."
Else
‘Bu ikisinden birini seçmek size kalmış.
Response.Redirect "http://www.domainadi.com/yollandi.asp"
‘response.write "form gönderildi"
end if
set email = Nothing
%>
________________________________________
Persits:
form.html:
<html>
<body bgcolor="#FFFFFF">

<form method=post action="gonder.asp">
Adınız : <input type="text" name="ad"><br>
E-mail adresiniz : <input type="text" name="email"><br>
Mesajınız : <textarea name="mesaj" rows="" cols=""></textarea><br>
<input type="submit" value="gonder">
</form>

</body>
</html>
gonder.asp:
<%
adi=trim(Request.form("ad")) 'form dan alynan isim
email=Request.Form("email") 'form dan alynan adres
mesaj=Request.Form("mesaj") ‘ form dan alınan mesaj

kimegidicek = email ' E-postanın yollanacağı adres

Set email = Server.Createobject("Persits.MailSender")
email.Host = "mail.domainadi.com" ' ' e-posta yollanırken hangi email sunucusu kullanılacak
email.From ="[email protected]" ' gönderenin mail adresi
email.FromName = ad ' gönderenin adı
email.AddAddress kimegidicek ' gidecek adres..
email.AddReplyTo kimegidicek ' karşılık yazılacak adres
email.Subject =konu
email.Body = mesaj

email.Send

‘Bu ikisinden birini seçmek size kalmış.
response.redirect "http://www.domainadi.com/yollandi.asp"
‘response.write "form gönderildi"
' açtığın nesneyi kapa...
Set email = Nothing
' bitti
%>

Bilgiler Bizden Teşekkürler Sizden Sayın HACKHELL Üyeleri
 
Geri
Üst