Camp San Francisco - Palolem Beach.

Sea Facing Huts

Garden View Huts

Goa Sight Seeing

Around Palolem

:: Booking Enquiry Form ::

<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then dim cdoConfig dim Mymail Dim Str Set cdoConfig = CreateObject("CDO.Configuration") With cdoConfig.Fields .Item(cdoSendUsingMethod) = cdoSendUsingPort .Item(cdoSMTPServer) = "174.36.193.180" .Item(cdoSMTPAuthenticate) = 1 .Item(cdoSendUsername) = "test@campsanfrancisco.com" .Item(cdoSendPassword) = "password" .Update End With Set Mymail = Server.CreateObject("CDO.Message") Set Mymail.Configuration = cdoConfig Mymail.To = "camp.sanfrancisco@gmail.com" 'MyMail.BCC="jayesh.rivankar@gmail.com" Mymail.From =trim(Request.form("email")) Mymail.Subject ="Reservation Enquiry !" Str="Dear " & Request.form("nm") & "," & vbcrlf str=str & "Thank You for contacting us, please give us 48 hrs time to confirm your enquiry status." & vbcrlf str=str & "your enquiry details are as below :" & vbcrlf Str=str & "Personal Details :-----------------------------------------------" & vbcrlf str=str & "Name:" & Request.form("nm") & vbcrlf str=str & "Contact No:" & Request.form("contactno") & vbcrlf str=str & "Address:" & Request.form("address") & vbcrlf str=str & "Country:" & Request.form("country") & vbcrlf str=str & "E-mail:" & Request.form("email") & vbcrlf str=str & "Room Details:-----------------------------------------------" & vbcrlf str=str & "No Of Rooms:" & Request.form("noofrooms") & vbcrlf str=str & "No of Extra Adult( Above 12 yrs):" & Request.form("extrabed") & vbcrlf str=str & "No of Extra Adult( Above 5 yrs):" & Request.form("extrabed1") & vbcrlf str=str & "Room Type:" & Request.form("RoomType") & vbcrlf str=str & "Check In Date:" & Request.form("idate") & "-" & Request.form("imonth") & "-" & Request.form("iyear") & vbcrlf str=str & "Checkout Date:" & Request.form("odate") & "-" & Request.form("omonth") & "-" & Request.form("oyear") & vbcrlf str=str & "Other Details:----------------------------------------------" & vbcrlf str=str & "Mode of Transport:" & Request.form("modeoftransport") & vbcrlf if request.form("pickup")="ON" then str=str & "Airport Pickup:Required" & vbcrlf else str=str & "Airport Pickup:Not Required" & vbcrlf end if str=str & "Comment:" & Request.form("comment") & vbcrlf str=str & "-----------------------------------------------------------" & vbcrlf str=str & "Please Note: Booking Confirmation only after approval and is subject to availability of rooms at the time of bookings" & vbcrlf Str=str & "Thanks & Regards," & vbcrlf str=str & vbcrlf Str=str & "Team Camp San Francisco" Mymail.TextBody = Str Mymail.Send 'Destroy the mail object! Mymail.from="camp.sanfrancisco@gmail.com" Mymail.To=trim(Request.form("email")) Mymail.send Set Mymail= nothing response.write "Thankyou for Contacting Us. We will Reply to you soon !" else %>

Personal Details

Name
:

Contact No
:

Address
:

Country
:

E-Mail
:

Room Details

No Of Rooms
:

No of Extra Adult( Above 12yrs)
:

No of Extra Child( Above 5yrs)

Room Type

Check in Date (dd/mm/yyyy)
: / /

Checkout Date (dd/mm/yyyy)
: / /

Other Details

Mode of Transport
:

Airport / Railway Pickup
: Required. (Pickup charges Extra as applicable)

Comments ( If Any)
:

<%end if%>

Camp San Francisco

Yoga & Ayurveda

Take A Tour

Kitchen