GUESTBOOK
<% formDurum = Request.Form("formdurum") If formDurum = "1" then MailMsg = "Asagidaki bilgiler www.yerebatan.com adresinden gelmistir,

" MailMsg = MailMsg & "Ad Soyad : " & Request.Form("ad") & " " & Request.Form("soyad") & "
" MailMsg = MailMsg & "Ulke : " & Request.Form("ulke") & "
" MailMsg = MailMsg & "Meslek : " & Request.Form("meslek") & "
" MailMsg = MailMsg & "Mesaji : " & Request.Form("mesaj") & "


" MailMsg = MailMsg & "Lutfen bu mesaja Cevap Ver (Reply) butonuna basarak cevap yazmayiniz,
yukarida belirtilen Email adresine " MailMsg = MailMsg & "cevap gonderiniz." Set mail = CreateObject("CDO.Message") mail.From = "Web Form Contact" mail.To = "murat@creahouse.net" mail.Subject = "www.yerebatan.com - Ziyaretci Defteri" mail.HTMLBody= MailMsg mail.Send Set mail = Nothing %> Mesajınız iletilmiştir. Teşekkürler <% Else %>
 
Name
Surname
Your Job
Country
Messege
 
<%end if%>