<% if request.form("soruveonerileriniz") <> "" AND session("mailgonderildi") <> "1" then adsoyad = request.form("adsoyad") eposta = request.form("eposta") telefon = request.form("telefon") soruveonerileriniz = request.form("soruveonerileriniz") body = body & "

 

 

" body = body & "" body = body & "" body = body & "" body = body & "

Ad Soyad:	"&adsoyad&"
E-Posta :	"&eposta&"
Telefon :	"&telefon&"
Soru ve Öneriler :	"&soruveonerileriniz&"

 

" formdangeldi = "1" session("mailgonderildi") = "1" Set Mail = Server.Createobject("Persits.MailSender") Mail.IsHTML = True Mail.Host = "mail.dokudanismanlik.com" Mail.From = "bilgi@dokudanismanlik.com" Mail.FromName = "Formdan Gelen" Mail.Username = "bilgi@dokudanismanlik.com" Mail. Password = "bogazici" Mail.AddAddress "bilgi@dokudanismanlik.com" 'Mail.AddCC "you@yourdomain.com" Mail.Subject = "Soru ve Öneriler" Mail.Body = body Mail.Send Set Mail = Nothing end if %>

 

 

<% if formdangeldi = "1" OR session("mailgonderildi") then %>

 

<% else %>

Soru ve Önerileriniz İçin
Adınız Soyadınız :
E-Posta Adresiniz :
Telefon Numaranız :
Soru ve Önerileriniz :

<% end if %>