<%Response.Buffer=True%> <%=siteadi%> | İletişim Formu. <% Dim t1name,t1,t2name,t2 t1name = "Mesajı Gönderen : " t1 = Request.Form("t1") t2name = "E-Mail Adres. : " t2 = Request.Form("t2") Dim stname,st stname = "Mesajın Konusu : " st = Request.Form("s1") Dim JMail Set JMail = Server.CreateObject("JMail.SMTPMail") JMail.ServerAddress = "&sitemail" JMail.AddRecipient "&mailsunucu" JMail.Sender = t2 JMail.Subject = ""&siteadi&" | İletisim Formu" JMail.Body = t1name & vbcrlf&_ t1 & vbcrlf&_ t2name & vbcrlf&_ t2 & vbcrlf&_ stname & vbcrlf&_ st JMail.Execute Set JMail = Nothing Response.Write"
" %>

Mesajınız Gönderilmiştir.
En Kısa Zamanda Değerlendirilecektir.
İlginiz için teşekkürler...

<%=siteadi%>

:::...TEKRAR GÖNDER...:::