<%@LANGUAGE="VBSCRIPT"%> <% ' CDO Email Form v1.0 If (cStr(Request("Submit")) <> "") Then Dim strBody 'Strings for body Dim objCDO strBody = Request.Form("body") ' This is multi-lined simply for readability strBody = "Tennis Warehouse Australia has received the following enquiry:" ' Some spacing: strBody = strBody & vbCrLf & vbCrLf strBody = strBody & "Customer Name: " ' A lot of people have asked how to use form data in the emails so ' I added this line to the sample as an example of incorporating form ' data in the body of the email. strBody = strBody & Request.Form("varName") strBody = strBody & vbCrLf & vbCrLf strBody = strBody & "Email Address: " strBody = strBody & Request.Form("varEmail") strBody = strBody & vbCrLf & vbCrLf strBody = strBody & "Number: " strBody = strBody & Request.Form("varNumber") strBody = strBody & vbCrLf & vbCrLf strBody = strBody & "Enquiry: " strBody = strBody & Request.Form("varMessage") ' A final carriage return for good measure! strBody = strBody & vbCrLf 'Set objCDO = Server.CreateObject("CDONTS.NewMail") Set objCDO = Server.CreateObject("CDO.Message") objCDO.From = cStr(Request("varEmail")) 'Senders Email objCDO.To = "Tennis Warehouse Australia " objCDO.Subject = "Tennis Warehouse Australia Enquiry" 'Email Address 'objCDO.Body = strBody 'Email Message objCDO.TextBody = strBody 'Email Message objCDO.Send() 'Send email Set objCDO = Nothing 'Clean up your objects!!! Response.Redirect("contacted.htm") 'use this to redirect page after delivery 'Response.Write("Message Delivered") 'default response End If %> Tenniswarehouse.com.au :: Tennis Racquets, Ball Machines, Stringing & More!
Tenniswarehouse.com.au :: Tennis Racquets, Ball Machines, Stringing & More!
You are currently on our old website. Click Here for the new one!

Tennis RacquetsRacquets
Tennis StringString
Tennis Stringing EquipmentString Equip
Tennis BallsBalls
Tennis AccessoriesAccessories
Tennis ApparelApparel
Tennis ShoesShoes
Tennis BagsBags
Ball MachinesBall Machine
OtherOther

ClearanceClearance
Gift VoucherGift Voucher

ForumForum

FAQ'sFAQ's
Photo GalleryGallery
LinksLinks


Mailing List

Subscribe
Remove

Privacy Policy


Please fill in the form below to contact us:

Name
*
Contact Number
Email Address
*
Enquiry
*
* Required Fields

 

Alternatively we can be reached at:
   
Address:
  
200 Alexandra Pde
 
Fitzroy VIC 3065
Phone:
  
+61 3 9418 3934
Fax:
  
+61 3 9418 3940
Email:
  
info@tenniswarehouse.com.au

We are open 8:30am - 5pm Monday to Friday
10am - 2pm Saturday
Closed Sunday

If you would like to catch the tram from the city,
please click on the need directions link for details.

Shopping Cart
bottom


Click image for a larger view:


Photo of our building



View a map for directions


Find out where to catch a tram from

 

 

 

 

 


Tennis Racquets | String | Ball Machines | Accessories | Apparel | Shoes | Bags