<%
if request.QueryString("durum")="send" then
body="Guest Name Guest Surname E-mail Adress Postal Adress Zip/City/Country Telephone Nr. Fax Nr. Room Type Number of Room Arrival Date Departure Date Flight Number Airline Arriving From Estimated Timp of Arrival Special Request Been to Turkey Before Where did you find us "
for a=1 to 18
frm=frm & request.Form("textfield" & a ) & " "
next
grimor="
"& body & "
" & frm & "
"
Set objJmail = Server.Createobject("JMail.Message")
objJmail.ContentType = "text/html"
objJmail.Charset = "ISO-8859-9"
objJmail.From = & Request.form("textfield1")
objJmail.Subject = "Rezervasyon Formu"
objJmail.AddRecipient "info@prestigehotelistanbul.com"
objJmail.Body = grimor
objJmail.Send("mail.prestigehotelistanbul.com")
Set objJmail = Nothing
end if
%>