<% session.abandon if request("komut")="gonder" then on error resume next mesaj= "************* KAAN BİLGİSAYAR WEB MESAJ BiLGiLERi ************" & chr(10) mesaj= mesaj & "Ad Soyad : " & request("isim") & chr(10) mesaj= mesaj & "Email : " & request("email") & chr(10) mesaj= mesaj & "Telefonu : " & request("telefon") & chr(10) mesaj= mesaj & "Faks : " & request("fax")& chr(10) mesaj= mesaj & "Kanal : " & request("kanal")& chr(10) mesaj= mesaj & "Mesaj : " & request("konu")& chr(10) Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "127.0.0.1" Mail.From = request("email") Mail.FromName = request("isim") Mail.AddAddress "info@kaan-bilgisayar.com" , "Kaan Bilgisayar İnternet ve Danışmanlık Hizmetleri" Mail.AddReplyTo request("email") Mail.Subject = "Web'den gelen Mesaj" Mail.Body = mesaj Mail.Send If Err <> 0 Then Aciklama= "Mail gönderilirken hata oluştu." else Aciklama= "Göndermiş olduğunuz E-Mail başarı ile elimize ulaştı.
İnceleyip en kısa zamanda size bilgi verilecektir." end if Set Mail=Nothing end if komut="" %> ECE MADENCİLİK İNŞAAT SAN.TİC.LTD.ŞTİ


<%=Aciklama%>
Adınız Soyadınız
E-posta Adresiniz
Telefon Numaranız
Faks Numaranız
İletişim Kanalı
(Size nasıl ulaşmamızı tercih edersiniz ?)

İletmek İstediğiniz Konu