<% Dim strsubj, govde govde=govde &" Adı : "& Request.Form("adi") &" "& chr(10) govde=govde &" Adresi: "& Request.Form("adres") &" "& chr(10) govde=govde &" Telefon Numarasi: "& Request.Form("tel") &" "& chr(10) govde=govde &" Faks Numarası : "& Request.Form("faks") &" "& chr(10) govde=govde &" Yetkili Kişi Adı: "& Request.Form("yadi") &" "& chr(10) govde=govde &" E-mail Adresi : "& Request.Form("mail") &" "& chr(10) govde=govde &" Sipariş Tarihi: "& Request.Form("siparis") &" "& chr(10) govde=govde &" Siparişin Özellikleri: "& Request.Form("soz") &" "& chr(10) govde=govde &" İstenilen Adet ve Renk ile ilgili Açıklama: "& Request.Form("istrenk") &" "& chr(10) govde=govde &" Diğer İstek ve Düşünceler: "& Request.Form("istekvedusunce") &" "& chr(10) Set strMail = CreateObject("Persits.MailSender") strMail.From = "ajansexpress@hotmail.com" strMail.FromName = "SipariS fORMu " strMail.IsHTML = False strMail.Host = "ajansexpress@hotmail.com" ' ENTER YOUR MAIL SERVER strMail.AddAddress "ajansexpress@hotmail.com" strMail.Subject = "Web Sayfasından Gelmektedir" strMail.Body = govde strMail.Send %> <% response.redirect ("http://www.orayguvenlik.com/basarili_form.htm") %>