<% StrKime = "info@artigumrukleme.com" 'StrKime = "macit@teknovizyon.net" 'StrKime = "macityusuf@hotmail.com" mailhost="mail.teknovizyon.biz" konu ="Web Sitenizden iletisim Formu" kimden = request.Form("StrCustomerEmail") %> <% Response.CharSet = "UTF-8" 'veya Session.CodePage = 65001 If Request.Form("Action") = "SendData" Then 'If Request.Form("StrCustomerName") <> "" and Request.Form("StrCustomerEmail") <> "" and Request.Form("konu") <> "" and Request.Form("Strmesaj") <> "Seçiniz" Then '#-------------------------------------------------------------------------------- Body = Body & "
" & vbCrLf Body = Body & "Mail Gönderi Bilgileri :" & vbCrLf Body = Body & "
" & vbCrLf Body = Body & "---------------------- " & vbCrLf Body = Body & "
" & vbCrLf Body = Body & "Adı Soyadı : "&request.Form("StrCustomerName")&" " & vbCrLf Body = Body & "
" & vbCrLf Body = Body & "E-Maili Adresi : "&request.Form("StrCustomerEmail")&" " & vbCrLf Body = Body & "
" & vbCrLf Body = Body & "Telefon No : "&request.Form("tel")&" " & vbCrLf Body = Body & "
" & vbCrLf Body = Body & "Konu : "&request.Form("konu")&" " & vbCrLf Body = Body & "
" & vbCrLf Body = Body & "Mesajı : "&request.Form("Strmesaj")&" " & vbCrLf Body = Body & "
" & vbCrLf Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "mail.teknovizyon.biz" Mail.Username = "cevaplama@teknovizyon.biz" ' Gönderen email ile aynı olmalı Mail.Password = "45344534" ' e-Mailinizin şifresini giriniz Mail.From = kimden MAIL.FromName = kimden ' emailin gönderen adı, istediğinizi yazabilirsiniz. MAIL.AddAddress StrKime ' mail göndermek istediğiniz email adresi Mail.Subject = konu Mail.IsHTML = True Mail.Body = Body Mail.Send set MAIL = nothing '#-------------------------------------------------------------------------------- mesajx="Mail formunuz başarıyla Gönderildi. En Kısa Sürede Değerlendirilecektir ..!" response.Redirect "mailyolla.asp?mesajx="&mesajx End If 'response.Write StrKime %> <%if request("mesajx") <> "" then%>



<%=request("mesajx")%>

İlginiz İçin Teşekkür Ederiz.


<%else%>
Adınız Soyadınız : *
E-Mailiniz : *
Telefon :
Konu : *
Mesajınız :
 
 

<%end if %>