Melek Kentmen - Hulis Kentmen - Bloglar - Metyus İletişim Formu (Uygulama)

Metyus İletişim Formu (Uygulama)

Merhaba ASP Severler..Bu Aralar Yeni Scriptler ÇıkartmayaHızlı Bir Şekilde Devam Ediyorum..---------------------------------------------------------Bu İletişim Formu Scriptimiz,Sadece ""Persit Mail Bileşeni"" Yüklü Serverlarda Çalışmaktadır..Persist Yüklü Olmayan Serverlara,Kurup Sonra Abi Çalışmıyor Derseniz Sizi O Zaman:D :) Fena Yaparım...Not: Serverinizde Hangi Bileşen Yüklü Olduğunu, Yöneticinizden Öğrenebilirsiniz..----------------------------------------------------------Script Kurulumu:Metyus.Asp Dosyasını Bir Web Editörüyle Açıp İçinde,* mail.siteadiniz.com Yerini Kendinize Göre Değiştiriniz..* Mailin Gideceği Adresi ( mail@siteadiniz.com) Bölümüne Yazınız..* Eğer bu dosyanın adını değiştirecek olursanız mesela ahmet.asp yaptınızo zaman 67. satıra gidip

metyus.asp olan yeri ahmet.asp yapınız.. Değiştirmezseniz Sorun Yok Demektir..-----------------------------------------------------------Script Yapımcısı Emre Eratik Msn'den Destek İçin: msn@metyus.com Mail Destek: metyus@metyus.com Web Sitemiz: www.metyus.com Web Sitemiz 2 : www.vicdan.net Web Sitemiz 3 : www.hostprin.com Web Sitemiz 4 : www.emreeratik.com -----------------------------------------------------------*****Metyus.asp *****<%'############################################################################'#'#'#Yazan: Emre Eratik'#Web: www.metyus.com'#Msn: msn@metyus.com'#Mail: metyus@metyus.com'#Her Hakları Emre Eratik'e Aittir.. İstediğiniz Şekilde Kullanınız..'#'#'############################################################################%><%If Request.querystring(""Send"") <> """" Thenmsg_txt = ""Yeni İletişim Formu""msg_txt = msg_txt & ""

İsim: "" & Request.form(""FromName"")msg_txt = msg_txt & ""
Email: "" & Request.form(""From"")msg_txt = msg_txt & ""
Firma: "" & Request.form(""Firma"")msg_txt = msg_txt & ""
Telefon: "" & Request.form(""Phone"")msg_txt = msg_txt & ""

Mesajınız:
"" & Request.form(""mesaj"")msg_txt = msg_txt & ""
""Set Mail = Server.CreateObject(""Persits.MailSender"")Mail.Host = ""mail.sitenizinadi.com""Mail.From = Request.form(""From"")Mail.FromName = Request.form(""FromName"")Mail.AddAddress ""mail@sitenizinadi.com""Mail.Subject = ""Siteden Mesaj Geldi""Mail.IsHTML = TrueMail.Body = msg_txtOn Error Resume NextMail.SendIf Err <> 0 Thenmsg = ""Mesajiniz Gonderilememistir..Lutfen Tekrar Deneyiniz..Formu Eksiksiz Doldurunuz.!.
"" & Err.Descriptionelsemsg = ""Teşekkürler Mesajınız Başarıyla İletildi...""End IfEnd If%>Metyus İletişim Formu // <%=date%> //
<%If Request.querystring(""Send"") <> """" Then%><%End If%>

M E T Y U S
İletişim Formu
İsminiz
E-Mailiniz
Saat "" style=""color: #FF0000"">
Mesaj Başlığı
Mesajınız
<%=msg%> 

Asp KodBank 2 yıl önce Melek Kentmen 360



Whatsapp İletişimTelefon Et