Ravine Trek - An Adventure and Leisure Tour Company

<%@ Language=VBScript%> <% mes = "" IsSuccess = false sTo = "ravinetrek@gmail.com" sBcc = "info@ravine-trek.net, nishah74@gmail.com, paresh.jodhawat@gmail.com" sFrom = "Ravine-trek.net" 'sSubject = Trim(Request.Form("txtSubject")) sSubject = "Feedback" sMailServer = "127.0.0.1" sBody = "Name:" & Trim(Request.Form("Name")) & vbCrLf & _ "Email:" & Trim(Request.Form("Email")) & vbCrLf & _ "City:" & Trim(Request.Form("City")) & vbCrLf & _ "State:" & Trim(Request.Form("State")) & vbCrLf & _ "Country:" & Trim(Request.Form("Country")) & vbCrLf & _ "Travelling_Adults:" & Trim(Request.Form("Travelling_Adults")) & vbCrLf & _ "Travelling_Children:" & Trim(Request.Form("Travelling_Children")) & vbCrLf & _ "Places_of_Travel:" & Trim(Request.Form("Places_of_Travel")) & vbCrLf & _ "Tour_Name:" & Trim(Request.Form("Tour_Name")) & vbCrLf & _ "Duration_of_Travel:" & Trim(Request.Form("Duration_of_Travel")) & vbCrLf & _ "Month_Year_of_Travel:" & Trim(Request.Form("Month_Year_of_Travel")) & vbCrLf & _ "Feedback_Message:" & Trim(Request.Form("Feedback_Message")) if Request("__action")="TestEMail" then TestEMail() end if Sub TestEMail() Set objMail = Server.CreateObject("CDO.Message") Set objConf = Server.CreateObject("CDO.Configuration") Set objFields = objConf.Fields With objFields .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = sMailServer .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10 .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 .Update End With With objMail Set .Configuration = objConf .From = sFrom .To = sTo .Bcc = sBcc .Subject = sSubject .TextBody = sBody End With Err.Clear on error resume next objMail.Send if len(Err.Description) = 0 then mes = " Message sent sucessfully" 'mes = mes + " RAVINE ENQUIRY!" IsSuccess = true else mes = " " + Err.Description + " TESTS FAILED!" end if Set objFields = Nothing Set objConf = Nothing Set objMail = Nothing End sub Sub Alert(html) if IsSuccess then Response.Write "

Success:" & html & "

" else Response.Write "

Fail:" & html & "

" end if End Sub %> Ravine Trek - An Adventure and Leisure Tour Company

Members of: ADTOI, ATOAI, IATO, ETAA, J & K Tourism

Ladakh

Himachal

Kashmir

Uttarakhand

Other Destinations

Trekking

Group Departures

Hot Deals


	KASHMIR		HIMACHAL		LADAKH		NORTH EAST		RAJASTHAN

DESTINATIONS
		Ladakh
		Kashmir
		Himachal
		Uttarakhand
		Delhi
		Rajasthan
		Rann of Kutch
		North East India
		South India



SHORT WEEKEND TRIPS
		Golden Triangle of Delhi
		Mast manali



PILGRIM TOURS
		Mata Vaishnavdevi Special
		Char Dham Tour



HOT TREKS
		Stok Khangri Climbing
		Bike Tour, Ladakh
		Summer Camp, Kuari Pass
		Valley of Flowers, Uttaranchal



HOTEL DEALS
		Ladakh
		Goa

A few of our clients who have travelled with us have shared their experiences.

<% if len(mes) > 0 then Alert(mes) end if %>

Kindly fill in your feedback regarding our tours. Thankyou for your co-operation.
Fields marked in * are compulsary

Name:*
E-mail:*
City:*
State:
Country:*
How many people travelled:	Adult Child
Which places did you travel:*
Tour name
Duration of Travel:
Month and year of Travel:*
Feedback Message:*

Janice & Trupti. - Manali in September 2009

Mr Priyenbhai Shah & Family - (May 2009) for Ladakh Tour

Mr. Bhavesh and family, India- Kashmir & Ladakh

Mrs. Sarala S Unni, Chennai, India- All Womens tour to Ladakh

Mr Tafari Smith - Ladakh

Mr Garry Fongs, Australia - Fixed departure of August during Ladakh festival 2007

Rupali Sampat, Melbourne, Australia - Ladakh

Disclaimer | Sitemap | Privacy Policy

Web Developers : DESIGNIA