<%@ LANGUAGE = VBScript.Encode %> <%Response.Flush()%> <%Server.ScriptTimeout = 120%> <% If Request.querystring("Send") <> "" Then msg_txt = "web iletisim" msg_txt = msg_txt & "

name: " & Request.form("FromName") msg_txt = msg_txt & "
Email: " & Request.form("From") msg_txt = msg_txt & "
country: " & Request.form("Firma") msg_txt = msg_txt & "
phone: " & Request.form("Phone") msg_txt = msg_txt & "

details:
" & Request.form("mesaj") msg_txt = msg_txt & "
" Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "mail.divamakina.com" Mail.From = Request.form("From") Mail.FromName = Request.form("FromName") Mail.AddAddress "info@divamakina.com" Mail.Subject = "web iletisim" Mail.IsHTML = True Mail.Body = msg_txt On Error Resume Next Mail.Send If Err <> 0 Then 'msg = "Mesajınız Gönderilemedi.
" & Err.Description msg = "Mesajınız Gönderilemedi. Varsa başka mail adresini giriniz...
" else msg = "Mesajınız Alınmıştır." End If End If %> Diva Makine Sanayi - Contact
................................................................................................................................................................................................




 
<%If Request.querystring("Send") <> "" Then%> <%End If%>
adı - soyadı
e-mail
ülke
telefon
not
<%=msg%>
 

Adres : İktelli Org. San. Bölgesi Başakşehir Sanayi Sitesi C Blok N0: 3-5 Başakşehir/ISTANBUL
phone:+90  212 485 66 16 - 17
Fax : + 90 212 485 34 61

................................................................................................................................................................................................
 

  Copyright 2010    www.divamakina.com     info@divamakina.com   phone:+90  212 485 66 16 DİVA KAKİNA