<% mes = "" IsSuccess = false sTo = "info@basarmuhendislik.com.tr" sFrom = "iletisimMesaji@planetteknoloji.com" sSubject = Trim(Request.Form("txtTelefon")) sName = Trim(Request.Form("txtName")) sMail = Trim(Request.Form("txtMail")) sMailServer = "127.0.0.1" sBody = Trim(Request.Form("txtBody")) if Request("__action")="MesajGonder" then MesajGonder() end if Sub MesajGonder() Set objMail = Server.CreateObject("CDO.Message") Set objConf = Server.CreateObject("CDO.Configuration") Set objFields = objConf.Fields With objFields .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = sMailServer .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10 .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 .Update End With With objMail Set .Configuration = objConf .From = sFrom .To = sTo .Subject = sSubject .TextBody = "Ad: " + sName + " E-mail :" + sMail + " Mesaj :" + sBody End With Err.Clear on error resume next objMail.Send if len(Err.Description) = 0 then mes = "Mesajiniz iletilmistir. Ilginiz için tesekkürler. Sizinle en kisa zamanda belirttiginiz iletisim yoluyla irtibat kuracagiz. " IsSuccess = true else mes = " " + Err.Description + " Mesajiniz bir hatadan dolayi gönderilememistir. Lütfen tekrar deneyiniz . Ilginiz için tesekkürler." end if Set objFields = Nothing Set objConf = Nothing Set objMail = Nothing End sub Sub Alert(html) if IsSuccess then Response.Write "
Gönderim Basarili:" & html & "
" else Response.Write "
Gönderim Basarisiz:" & html & "
" end if End Sub %> Simge Elektroteknik, Elektrik Taahhüt ve Proje Uygulama, Fabrika ve Gemi Elektriği
Orta Gerilim Trafo ve Enerji Nakil Hatları
 
 

 

Simge Elektroteknik - İletişim

<% if len(mes) > 0 then Alert(mes) end if %>

Simge Elektroteknik'e iletişim formunu doldurarak yada aşağıdaki adres bilgilerinden yararlanarak ulaşabilirsiniz. İletişim formunu kullanmak isteyenlerin formu eksiksiz ve doğru bilgilerle doldurmasını öneririz. Eksik yada yanlış bilgilerden ötürü yaşanan aksaklıklardan sorumluluk kabul etmiyoruz.İlginize ve hassasiyetinize teşekkür ederiz.

Adres          : Simge Elektroteknik Cumhuriyet                        Cad. No:124 Kat:4 D:9 İzmit -                        KOCAELİ

Telefon       : +90 262 325 04 59
                       +90 262 324 26 04

Faks            : +90 262 324 24 18


E-mail         : info@simgeelektroteknik.com.tr

     Simge Elektroteknik ; endüstriyel tesisler, enerji üretim, iletim ve dağıtım tesisleri, yönetim binaları, iş ve alışveriş merkezleri, sağlık
 tesisleri, akıllı binalar, otel ve tatil köyleri, toplu konutlar, sosyal tesisler, kültür merkezleri, organize sanayi bölgeleri vb. yapı tesisleri
 elektrik sistemlerinin komple projelendirilmesi müşavirlik hizmetlerinin verilmesi ve uygulama taahhüüt işlerinin yapılmaları konusunda
 faaliyet göstermek amacıyla 1982 yılında kurulmuştur. Firmamız kuruluduğundan bu güne teknolojinin son ürün ve hizmetlerini kullanarak
 müşterilerine en yenilikçi ve güvenilir çözümleri ilke edinmiş, bu anlayışından ödün vermeden sürekli gelişimini hedeflemiştir.

<% Response.Cookies("planet")("iletisim.php") = "" Server.Execute("/planetWeb/track.php") %>