<%response.buffer=true%>
<%
Dim theSRV
theSRV = Request.ServerVariables("SERVER_NAME")
Select Case theSRV
Case "www.sharkcagediving.com.au" Response.Redirect("shark/default.htm")
End Select
%>
Calypso Star Charter & Shark Cage Diving - Merchandise
We are proud to present to you our range of Merchandise.
If you would like to purchase any of the items - please
click here for Order form
or
email us - Relevant POSTAGE COSTS Apply.
