![]() |
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
|