<% '**************************************************************************************** '* Copyright Notice - There isnt one for this script. '* '* This script is free for use. '* '* There is no support with this script. We are available for a free quotes. '* '* Web Animations take NO responsiblity with this script for any problems. '****************************** Use it at your own risk********************************* '**************************************************************************************** ' form start dim mail, smtpServer, smtpPort, message, SendString, subject, name, email, address, telnoday, mobile, content, StringValue, FormValue, sender, check1, check2 ' Put your SMTP Mail server here. If you do not know, ask your network administrator smtpServer = "mail.holidayvilla-florida.com" smtpPort = 25 ' this will not require changing unless instructed by your network administrator 'The message that appears in the subject of all emails subject = "Holiday Villa Vacation" 'Sender sender = "enquiry@holidayvilla-florida.com" ' Now gets the data from Form name = Request.Form("name") email = Request.Form("email") address = Request.Form("address") telnoday = Request.Form("telnoday") mobile = Request.Form("telnoeve") content = Request.Form("content") check1 = Request.Form("C1") check2 = Request.Form("C2") ' Sends Email ' This is the customers email Set mail = CreateObject ("JMail.SMTPMail") mail.ServerAddress = smtpServer & ":" & smtpPort mail.Sender = sender mail.Subject = subject mail.AddRecipient sender If check1 = "ON" Then mail.AddRecipient email End If mail.ContentType = "text/html" mail.ISOEncodeHeaders = false mail.ContentTransferEncoding = "8bit" 'This is what is sent to the customer. 'Switch to determine booking form or enquiry If check2 = "ON" Then message = BuildstringBooking(SendString) else message = BuildString(SendString) End If mail.Body = message ' Send all email ' Turn on error handling On Error Resume Next If Not mail.execute Then Response.Write( "ERROR MESSAGE: " & Jmail.ErrorMessage & "


" & vbcrlf ) Response.Write( "ERROR SOURCE: " & Jmail.ErrorSource & "


" & vbcrlf ) Response.Write( "LOG: 
" & Jmail.Log & "
" & vbcrlf ) End If set mail = nothing function BuildString(SendString) ' build header SendString = "" SendString = SendString & "" SendString = SendString & "
Thank you very much for your enquiry.
" ' body SendString = SendString & BuildElement("Name", name) SendString = SendString & BuildElement("Email", email) SendString = SendString & BuildElement("Address", address) SendString = SendString & BuildElement("Day Tel.", telnoday) SendString = SendString & BuildElement("Mobile Tel.", mobile) SendString = SendString & BuildElement("Comments", content) SendString = SendString & "
" ' finish off SendString = SendString & "

kind regards

Sarah Patterson" SendString = SendString & "

Email:   enquiry@holidayvilla-florida.com" SendString = SendString & "
Web:    www.holidayvilla-florida.com

" SendString = SendString & "" BuildString = SendString end function function BuildElement(StringValue, FormValue) dim SendString1 SendString1="" & StringValue & "" & FormValue & "" BuildElement = SendString1 end function function BuildElementBooking(StringValue, FormValue) dim SendString1 SendString1 = "" & StringValue & "" & FormValue & "" BuildElementBooking = SendString1 end function function BuildNameElement(StringValue, StringValue2, StringValue3) dim SendString1 SendString1="" & StringValue & "" & StringValue2 & "" & StringValue3 & "" BuildNameElement = SendString1 end function function BuildStringBooking(SendString) dim name1, age1, name2, age2, name3, age3, name4, age4, name5, age5, name6, age6, name7, age7, ArrivalDate, DepartureDate name1 = Request.Form("name1") age1 = Request.Form("age1") name2 = Request.Form("name2") age2 = Request.Form("age2") name3 = Request.Form("name3") age3 = Request.Form("age3") name4 = Request.Form("name4") age4 = Request.Form("age4") name5 = Request.Form("name5") age5 = Request.Form("age5") name6 = Request.Form("name6") age6 = Request.Form("age6") name7 = Request.Form("name7") age7 = Request.Form("age7") //Header SendString = "" //Table content SendString = SendString & "" SendString = SendString & "
Copy of booking form sent to enquiry@holidayvilla-florida.com." SendString = SendString & "

You will receive confirmation of your booking within 48 hours together with payment details." SendString = SendString & "
By returning this booking form you have agreed with our terms and conditions as specified on the web site www.holidayvilla-florida.com.

" SendString = SendString & BuildElement("Name", name) SendString = SendString & BuildElement("Email", email) SendString = SendString & BuildElement("Address", address) SendString = SendString & BuildElement("Day Tel.", telnoday) SendString = SendString & BuildElement("Mobile Tel.", mobile) ArrivalDate = Request.Form("ArrivalDay") & "-" & Request.Form("ArrivalMonth") & "-" & Request.Form("ArrivalYear") SendString = SendString & BuildElement("Arrival Date", ArrivalDate) DepartureDate = Request.Form("DepartureDay") & "-" & Request.Form("DepartureMonth") & "-" & Request.Form("DepartureYear") SendString = SendString & BuildElement("Departure Date", DepartureDate) SendString = SendString & BuildElement("Pool Heat", Request.Form("poolheatrequired")) if (not name1 = "" OR not age1 = "") Then SendString = SendString & BuildNameElement("Additional members in party", "Name", "Age") SendString = SendString & BuildNameElement("", name1, age1) end if if (not name2 ="" OR not age2 = "") Then SendString = SendString & BuildNameElement("", name2, age2) end if if (not name3 = "" OR not age3 = "") Then SendString = SendString & BuildNameElement("", name3, age3) end if if (not name4 = "" OR not age4 = "") Then SendString = SendString & BuildNameElement("", name4, age4) end if if (not name5 = "" OR not age5 = "") Then SendString = SendString & BuildNameElement("", name5, age5) end if if (not name6 = "" OR not age6 = "") Then SendString = SendString & BuildNameElement("", name6, age6) end if if (not name7 = "" OR not age7 = "") Then SendString = SendString & BuildNameElement("", name7, age7) end if if (not content = "") Then SendString = SendString & BuildElement("Comments", content) end if SendString = SendString & "
" //Sign Off SendString = SendString & "

Email:   enquiry@holidayvilla-florida.com" SendString = SendString & "
Web:    www.holidayvilla-florida.com

" SendString = SendString & "" BuildStringBooking = SendString end function %>
Holiday Villa Florida Holiday Villa Florida Images of the house
home
the house
take a look
floorplan
the area
map
prices
availability
terms
book online
contact us

 

Holiday Villa rental Terms & Conditions

Deposit: A deposit of £150 or $200 per week is required when booking our villa. As soon as this deposit is received, your booking will be confirmed. This deposit is non-refundable. The balance of the rental cost will be required 2 months prior to your rental period commencing. Bookings made within 2 months of your vacation commencing require the full amount to be paid when the reservation is made. Payment can be made by cheque or bankers draft in GB pounds or US Dollars.

Security Deposit: A security deposit of £200 or $400 is required to be paid along with your balance payment to guard against any damage done to our villa during your occupancy. This deposit is returned to you less the cost of any breakages, loss or damage after your holiday has ended. The party leader agrees to accept full liability for all loss or damage caused by any member of their party, during the occupation of our villa and confirms that the full cost of repair or replacement will be met. Any charges incurred due to misuse of the security system or calls in error to Security Company will be deducted from the Security Deposit.

Cancellation: Should a cancellation be necessary then your deposit will be lost. Should the cancellation occur after the balance has been paid then the full amount will be lost. We strongly advise you to take out holiday travel insurance as soon as your booking is confirmed - this should cover any cancellations for reasons beyond your control. If a client does not pay the balance when it becomes due then we reserve the right to cancel the booking and retain the deposit. In the event of a cancellation then any security deposit already paid will be returned to the client.

Occupancy: Our villa is usually ready for occupancy from 4:00PM on the day of arrival and needs to be vacated promptly by 11:00AM on the day of departure. If you have a late flight you should consider reserving the villa for an extra night. Two weeks before your holiday, you will be sent the code to lock box for the door key. Also directions from the airport to the villa will be provided. Over-occupancy of the villa will not be permitted. Only the persons named on the booking form are allowed to use the villa and the facilities at Highlands Reserve (this is a requirement of Florida State Law).

Liability: In the event of any problems whatsoever the owners or their agents cannot accept liability for any damage or loss of your property or possessions or personal accident sustained by you, your party members or any visitors. We advise all guests have holiday insurance.

Pools & Pool Heating: The pool has a pool heater that can be switched on at an extra cost. We are happy to arrange this for you should you require it. Guests should be aware that the terms "pool heating" and "pool heat" do not imply or confirm that any specific water temperature is guaranteed. In occasional severe winter conditions is it possible that the pool heater may not be able to maintain the water at a consistent temperature - this does NOT constitute a malfunction. The pool blanket should be used, especially during periods of cooler weather to prevent heat loss. ANY issues with the pool heating should be directed to the local management company (preferably whilst you are in attendance at the villa) so that they can deal with your concerns.

Maintenance: Our rental home is maintained by a local management company. All breakages, accidents, problems and losses must be reported to the local management as soon as they occur so that they can be attended to. As with any home appliances will, from time to time, malfunction and may need repair - the local management company will use their best endeavours to have any problem rectified as quickly as possible. Access to the rental home may be required by authorised maintenance personnel during your stay.

Force Majeur: The owners or their agents will not be liable for problems or delays caused by strikes, riots, political unrest, hostilities, war, terrorist activity, industrial disputes, fire, flood, tornadoes, hurricanes, transportation problems, airport closures, weather conditions or any other event beyond our immediate control. We suggest that you take out adequate travel insurance to cover such eventualities.

General Points: Swimming pools are great fun and few people would choose a holiday home without one. However they are an obvious source of DANGER especially for young children. We cannot accept any liability whatsoever for any injury caused as a result of using the swimming pool in the villa. You are advised NEVER to allow children to use the pool unsupervised.

 Smoking is not permitted in our villa.

Pets are not permitted in our villa.
<% Response.End() ' Ends script %>