<% ' enquiries.php Option Explicit Dim iIterator, arrCountry, strCountry Dim strOrganisation, strEmail, strName,strAddress, mess, strPhone Dim strSubmit, strSubject, strComments, strPostUser, strProduct, strQuantity, strPrice, strArea, strCompany, strShipping mess="" strPostUser= Request.Form ( "submit" ) If strPostUser="submit" Then 'checking for update of text areas strCompany = Request.Form ( "company" ) strName = Request.Form ( "name" ) strAddress = Request.Form ( "address1" ) & " " & Request.Form ( "address2" ) strPhone = Request.Form ( "phone" ) strProduct = Request.Form ( "product" ) strQuantity = Request.Form ( "quantity" ) strPrice = Request.Form ( "price" ) strArea = Request.Form ( "area" ) strEmail = Request.Form ( "email" ) strComments = Request.Form ( "enquiry" ) strShipping = Request.Form ( "shipping" ) strSubject = "Line-O-Dot Online Order for" & strName On Error Resume Next Dim objMailer Set objMailer = Server.CreateObject("Dundas.Mailer") objMailer.FromAddress = strEmail objMailer.Subject "Ray-O-Lite Online Order for" & strName objMailer.TOs.Add "gapetty@bigpond.com" Dim strBody strBody = "Ray-O-Lite Order from: " & vbCrLf & vbCrLf & "Name: " &strName & vbCrLf & vbCrLf & "Address: " & strAddress & vbCrLf & vbCrLf & "Phone: " & strArea & " " & strPhone & vbCrLf & vbCrLf & "Email: " & strEmail & vbCrLf & vbCrLf & "Quantity (no. of Boxes): " & strQuantity & vbCrLf & vbCrLf & "Product: " & strProduct & vbCrLf & vbCrLf & "Price: " & strPrice & vbCrLf & vbCrLf &"Comments: "& vbCrLf & vbCrLf & strComments objMailer.Body = strBody objMailer.SendMail Set objMailer = nothing mess="Your Message has been sent, Thank You" End If %> Wollongong Small Business Complex


• About Us
• Brochure
• Product Range
• Place an Order
• Contact Us

Place an Order

<%=mess%>

Please contact us by filling in your details below.
We will get back to you as soon as possible.

Company Name:
Name:
Address:
Phone:   
Email:
Quantity:
If you Wish to select more than one product hold the CTRL key and select multiple products.
Product:
Price:
Shipping:

Comment Box:

If you wish to purchase multiple products please list how many of each you want above along with any other comments you may have.


Email Us