<% Dim FName,Email,Phone,Address,State,Country,Persons,Rooms,RoomType,PickUp_Day,PickUp_Month,PickUp_Year Dim PickUp_Time,Drop_Day,Drop_Month,Drop_Year,Drop_Time,Msg Dim mailbody FName= Request("FName") Email= Request("Email") PickUp_Day= Request("PickUp_Day") PickUp_Month= Request("PickUp_Month") PickUp_Year= Request("PickUp_Year") PickUp_Time= Request("PickUp_Time") Drop_Day= Request("Drop_Day") Drop_Month= Request("Drop_Month") Drop_Year= Request("Drop_Year") Drop_Time= Request("Drop_Time") Persons= Request("Persons") Rooms= Request("Rooms") RoomType= Request("RoomType") mailbody = "" mailbody = mailbody & "" mailbody = mailbody & "" & _ "" & _ "" & _ "" & _ "" & _ "" & _ "" mailbody = mailbody & "
Below is the Reservation details from " & FName & "
Name : " & FName & "
Email :" & Email & "
Check-in Date: " & PickUP_Day & "/" & PickUp_Month & "/" & PickUp_Year & "-" & PickUp_Time & "
Check-out Date: " & Drop_Day & "/" & Drop_Month & "/" & Drop_Year & "-" & Drop_Time & "
Persons : " & Persons & "
Rooms :" & Rooms & "
Room Type: " & RoomType & "
" Dim NameError Dim EmailError Dim MsgError Dim Summary NameError = "" EmailError = "" MsgError = "" Summary = "" Sub Main() if Not Trim( Request.Form("Submit") ) = "" then Dim valid valid = true if Trim(Request.Form("FName")) = "" then valid = false NameError = "Enter Name " End if if Trim(Request.Form("Email")) = "" then valid = false EmailError ="Enter email " else Dim re Set re = new RegExp re.pattern = "^\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*$" if not re.Test(Trim(Request.Form("Email"))) then valid = false EmailError ="Enter valid email " end if end if if valid then Set Mail = Server.CreateObject("SMTPsvg.Mailer") 'create an Asp mail component. Mail.FromName = "Eco Exotica" Mail.FromAddress = Request.Form("Email") Mail.RemoteHost = "mrelay.perfora.net" ' The mail server you have to use with Asp Mail Mail.AddRecipient "Eco Exotica", "eeholidays@gmail.com" Mail.Subject = "Eco Exotica - Book a Room" Mail.ContentType = "text/html" Mail.BodyText = mailbody if Mail.SendMail then Summary = "Your mail has already been sent..." else Summary = "Mail send failure. Error Please try again " & Mail.Response end if else Summary = "Some error occured please check" end if end if end sub call Main %>
<%=Summary%> Reservation Information :
Name :

Email :

Check in :



Check Out :



Persons :
" />
Rooms :
" />
Room Type :



Trekking

In almost every part of India, there are great trekking and walking opportunities for the outdoor enthusiast.During these treks you will come face to face with the spectacular beauty of the wilderness here, the far flung villages with their own peculiar traditions and the magnificent wildlife that inhabit the forests of India. Our Resort is set amidst spectacular sceneries and locations in the mountains.Our . All arranged by top professionals in the field. Our Resort is set amidst spectacular sceneries.

The program covers many valleys peaks the plantations and managed and natural forest are worth seeing . Wild animals and birds as well as plants are peculiar to this hills . among the wild animals , elephants basins Nilgiri lancore Nilgiri tar mongoose are common ones . Wild plants such as ‘Neelakurinji” (which flowers once in twelve years) Rhododendsons Orchids are the rare species which found only in Himalayas and Munnar hills . Birds and butterflies are very rich in this hills.back

tree house stay
Copyright 2008. All rights reserved. Website Designed And Developed by Glad Solutions.