Wollongong Small Business Complex

<% ' enquiries.php Option Explicit Dim iIterator, arrCountry, strCountry Dim strOrganisation, strEmail, strName, strAddress, strPhone, mess Dim strSubmit, strSubject, strEnquiry, strPostUser, strArea, strCompany 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" ) strArea = Request.Form ( "area" ) strSubject = Request.Form ( "subject" ) strEmail = Request.Form ( "email" ) strEnquiry = Request.Form ( "enquiry" ) On Error Resume Next Dim objMailer Set objMailer = Server.CreateObject("Dundas.Mailer") objMailer.FromAddress = strEmail objMailer.Subject = "WSBC Enquiry" objMailer.TOs.Add "gapetty@bigpond.com" Dim strBody strBody = "WSBC Enquiry from: " & vbCrLf & vbCrLf & "Name: " &strName & vbCrLf & vbCrLf & "Address: " & strAddress & vbCrLf & vbCrLf & "Phone: " & strArea & " " & strPhone & vbCrLf & vbCrLf & "Email: " & strEmail & vbCrLf & vbCrLf & strEnquiry objMailer.Body = strBody objMailer.SendMail Set objMailer = nothing mess="Your Message has been sent, Thank You" End If %> Wollongong Small Business Complex

• About Us
• Locality Map
• Space Available
• Sizes & Rates
• Tenant Listing
• Types of Tenancy
• Vacancies
• What is a Business Incubator?
• What our Tenants Say
• Contact Us

<%=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:

Enquiry: