% @ LANGUAGE = VBSCRIPT %>
<%
DIM FNAME,BBNAME,PHONE,EMAIL,COMMENTS,DAY,MONTH,YEAR,NIGHTS
FNAME = Request.Form("Name")
EMAIL = Request.Form("Email")
PHONE = Request.Form("Telephone")
ADDR = Request.Form("Address")
FAX = Request.Form("Fax")
PAY = Request.Form("PaymentMethod")
DAY = Request.Form("Day")
ROOM = Request.Form("Room")
ADULTS = Request.Form("Adults")
MONTH = Request.Form("Month")
YEAR = Request.Form("Year")
NIGHTS = Request.Form("Nights")
COMMENTS = Request.Form("Comments")
%>
Enquiry Confirmation - Rye Beach Bed and Breakfast
<%
'Send an EMail to the B&B owner and to us
'Declare variables to be used in HTML Mail
' Create the JMail message Object
set jmail = Server.CreateOBject( "JMail.Message" )
' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
jmail.Logging = true
jmail.silent = true
' Most mailservers require a valid email address
' for the sender
jmail.From = EMAIL
jmail.FromName = FNAME
' Next we have to add some recipients.
' The addRecipients method can be used multiple times.
' Also note how we skip the name the second time, it
' is as you see optional to provide a name.
jmail.AddRecipient "info@ryebeach.com.au"
jmail.AddRecipientBCC "cpeck@ozbedandbreakfast.com"
' The subject of the message
jmail.Subject = "Booking/Enquiry request - RyeBeach.com.au"
' Note the use of vbCrLf to add linebreaks to our email
jmail.appendText "The following guest would like to stay with us:" & vbCrLf &vbCrLf
jmail.appendText "Guest Name: " & FNAME & vbCrLf
jmail.appendText "Email : " & EMAIL & vbCrLf
jmail.appendText "Day Phone : " & PHONE & vbCrLf
jmail.appendText "Address : " & ADDR & vbCrLf & vbCrLf
jmail.appendText "Arrival Date : " & MONTH & " " & DAY & ", " & YEAR & vbCrLf
jmail.appendText "Room requested : " & ROOM & vbCrLf
jmail.appendText "# of Adults : " & ADULTS & vbCrLf
jmail.appendText "Nights required: " & NIGHTS & vbCrLf
jmail.appendText "Pref. payment : " & PAY & vbCrLf & vbCrLf
jmail.appendText "Comments from guest:" & vbCrLf
jmail.appendText COMMENTS & vbCrLf & vbCrLf
jmail.appendText "Simply respond to this email to verify and confirm their details." & vbCrLf
jmail.Send( "mail.ozbedandbreakfast.com" )
' And we're done! the message has been sent.
%>
<%
'Send an EMail to the user
'Declare variables to be used in HTML Mail
' Create the JMail message Object
set jmail = Server.CreateOBject( "JMail.Message" )
' Set logging to true to ease any potential debugging
' And set silent to true as we wish to handle our errors ourself
jmail.Logging = true
jmail.silent = true
' Most mailservers require a valid email address
' for the sender
jmail.From = "info@ryebeach.com.au"
jmail.FromName = "Rye Beach Bed and Breakfast"
' Next we have to add some recipients.
jmail.AddRecipient EMAIL
' The subject of the message
jmail.Subject = "Your enquiry - Rye Beach Bed and Breakfast"
' Note the use of vbCrLf to add linebreaks to our email
jmail.Body = FNAME & "," & vbCrLf & vbCrLf
jmail.appendText "The following enquiry has been received by us at Rye Beach Bed and Breakfast" & vbCrLf
jmail.appendText "Arriving on : " & Month & " " & DAY & ", " & YEAR & vbCrLf
jmail.appendText "Room requested: " & ROOM & vbCrLf
jmail.appendText "Staying for : " & NIGHTS & " night(s)" & vbCrLf & vbCrLf
jmail.appendText "Please note, this e-mail is not yet a confirmed booking." & vbCrLf
jmail.appendText "We will contact you shortly to verify and confirm availability." & vbCrLf & vbCrLf
jmail.appendText "Regards," & vbCrLf & vbCrLf
jmail.appendText "John Taylor" & vbCrLf
jmail.appendText "Rye Beach Bed and Breakfast" & vbCrLf
jmail.appendText "Phone: (03) 5985 1674" & vbCrLf
jmail.appendText "Email: info@ryebeach.com.au" & vbCrLf
jmail.appendText "Web : http://www.ryebeach.com.au" & vbCrLf & vbCrLf & vbCrLf
jmail.appendText "PS - if your looking for more B&B accommodation throughout Australia, visit OZBedandBreakfast.com" & vbCrLf
jmail.appendText "http://www.ozbedandbreakfast.com"
jmail.Send( "mail.ozbedandbreakfast.com" )
' And we're done! the message has been sent.
%>
| <%=FNAME%>,
You will receive an email at
<%=EMAIL%> with your reservation/enquiry details.
Please note, we
will
contact you shortly to confirm your booking or
answer any questions you may have.
Thank you for your interest in
Rye Beach Bed and
Breakfast.
Regards,
John Taylor
Back to Rye Beach
B&B
|
|