|
<% if request.form("submit") = "Submit" then
ArrivalDay= Request.Form("ArrivalDay")
ArrivalMonth= Request.Form("ArrivalMonth")
ArrivalYear= Request.Form("ArrivalYear")
nights= Request.Form("nights")
adults= Request.Form("adults")
kids= Request.Form("kids")
ages= Request.Form("ages")
preferredroom=request.Form("preferredroom")
Occupancy=request.Form("Occupancy")
CateogaryOfRoom=request.Form("CateogaryOfRoom")
otherinfo= Request.Form("otherinfo")
title= Request.Form("title")
name= Request.Form("name")
City=request.Form("City")
State=request.Form("State")
Country=request.Form("Country")
email= Request.Form("email")
tel= Request.Form("tel")
fax= Request.Form("fax")
method= Request.Form("method")
set mymail=server.createobject("CDONTS.NEWMAIL")
mymail.Body="Message To Ranjit's Svaasa
" & "Enquiry Date :- " & date & " Arrival Date (dd/mm/yy):- " & ArrivalDay & "/" & ArrivalMonth &"/"& ArrivalYear & " Number Of Nights :- " & nights & " Number of Adults :- " & adults & " Number of Children :- " & kids & " Ages of Children :-" & ages & " Preferred Room For Occupancy :-" & preferredroom &" Occupancy :-" & Occupancy &" Cateogary Of Room :- " & CateogaryOfRoom & " Other Requirements and Information :- " & otherinfo & " Name :- " & title & ". " & name & " Address City Name :- " & City & " State :- " & State & " Country :- " & Country & " E-mail Address :- " & email & " Telephone Number :- " & tel & " Fax Number :- " & fax & " Contact to Customer :- " & method
mymail.Subject="Query for Ranjit's Svaasa"
mymail.To="spa@svaasa.com"
mymail.Bcc="info@sangarmaalsoftech.com"
mymail.From=request.form("email")
myMail.BodyFormat = 0
myMail.MailFormat = 0
mymail.Importance=2
mymail.Send
set mymail=nothing
Response.write "
Thanks for your query. We'll get back to you as soon as possible!"
%>
<%else%>
<% end if %>
|
|
|