<%@ Language=VBScript %> <% if Request.QueryString("Func") = "Post" then Set msg = Server.CreateObject("CDONTS.NewMail") ' Set logging to true to ease any potential debugging ' And set silent to true as we wish to handle our errors ourself ' msg.Logging = true ' msg.silent = true ' Most mailservers require a valid email address ' for the sender msg.To = "info@accommodationcape.co.za; archive@infinitsol.com;" msg.From = "info@accommodationcape.co.za" msg.Host = "pop.accommodationcape.co.za" ' Note that as addRecipient is method and not ' a property, we do not use an equals ( = ) sign ' msg.AddRecipient EmailTo ' The subject of the message msg.Subject = "Wedgewood Cottage - Enquiry Form" MessageBody = "Enquiry Form " & Date() & " at: " & Time() & vbcrlf & vbcrlf 'add every form element and its value to the email 'FOR EACH el IN Request.Form ' MessageBody = MessageBody & el & ": " & Request.form(el) & VBCRLF 'NEXT MessageBody = MessageBody & "ENQUIRY FORM:" & VBCRLF & VBCRLF MessageBody = MessageBody & "Name: " & REQUEST("name") & VBCRLF MessageBody = MessageBody & "Surname: " & REQUEST("surname") & VBCRLF & VBCRLF MessageBody = MessageBody & "Home Address: " & REQUEST("homeadd") & VBCRLF MessageBody = MessageBody & "Postal Address: " & REQUEST("postaladd") & VBCRLF & VBCRLF MessageBody = MessageBody & "Home Telephone: " & REQUEST("hometel") & VBCRLF MessageBody = MessageBody & "Work Telephone: " & REQUEST("worktel") & VBCRLF MessageBody = MessageBody & "Fax: " & REQUEST("fax") & VBCRLF MessageBody = MessageBody & "Email: " & REQUEST("email") & VBCRLF & VBCRLF MessageBody = MessageBody & "Preferred date of Arrival: " & REQUEST("arrival") & VBCRLF MessageBody = MessageBody & "Preferred date of Departure: " & REQUEST("departure") & VBCRLF MessageBody = MessageBody & "Number of Adults: " & REQUEST("adults") & VBCRLF MessageBody = MessageBody & "Number of Children: " & REQUEST("kids") & VBCRLF & VBCRLF msg.Body = MessageBody msg.Send() Response.redirect("http://www.accommodationcape.co.za/index.htm") end if %>
Home Page Information Gallery Enquiries form Contact us & Directions
Printer Friendly Version   ENQUIRIES   Printer friendly Version
Name: Home phone:
Surname: Work phone:
Home address: Postal address:
Fax: Email:

Date of arrival*:
Date of departure*:

Number of Adults: 		Number of Children:

 		  

* Arrival after 2pm and depature before 11am unless prior arrangements were made

Website created by Being IT Solutions cc                                    Hosting by