%@ Language=VBScript %>
Hotel Meghalaya - Reserve a Room
<%
dim body1
body1="From :" & request.Form("name") & "
"
body1 = body1 & "Address : " & request.Form("address") & "
"
body1 = body1 & "City :" & request.Form("city") & "
"
body1 = body1 & "State :" & request.Form("state") & "
"
body1 = body1 & "PIN :" & request.Form("pin") & "
"
body1 = body1 & "Country :" & request.Form("country") & "
"
body1 = body1 & "City :" & request.Form("city") & "
"
body1 = body1 & "Phone :" & request.Form("phone") & "
"
body1 = body1 & "Fax :" & request.Form("fax") & "
"
body1 = body1 & "Email :" & request.Form("email") & "
"
body1 = body1 & "Arrival Date(mm/dd/yyyy) :" & request.Form("month1") & "/" & request.Form("date1") & "/" & request.Form("year1") & "
"
body1 = body1 & "Arrival Time :" & request.Form(arr_time) & request.Form("time1") & "
"
body1 = body1 & "Departure Date(mm/dd/yyyy) :" & request.Form("month2") & "/" & request.Form("date2") & "/" & request.Form("year2") & "
"
body1 = body1 & "No. of Persons :" & request.Form("persons") & "
"
body1 = body1 & "No. of Rooms :" & request.Form("rooms") & "
"
body1 = body1 & "Type of Room :" & request.Form("room_type") & "
"
body1 = body1 & "Special Requets :" & request.Form("remarks") & "
"
set nw = server.createObject("CDONTS.NewMail")
nw.From = "hotelmeghalaya.com"
nw.To = "webmaster@hotelmeghalaya.com"
nw.subject = "Reserve a Room"
nw.body= body1
nw.send
response.Write ("Thank you for choosing Hotel Meghalaya. Your Request to reserve a room has been sent to the webmaster.")
%>