<%Option Explicit
Response.Buffer = True
Dim HostURL
HostURL = Lcase(Request.ServerVariables("HTTP_HOST"))
Select Case HostURL
'Find which site to redirect to
Case "www.hydroscape.insuranceplans.com","hydroscape.insuranceplans.com"
Response.Redirect("http://www.insuranceplans.com/15")
Case "www.juchafamily.com", "juchafamily.com"
Response.Redirect("http://www.insuranceplans.com/JuchaFamily")
'Case "www.fiddlesticks.com", "fiddlesticks.com"
'Response.Redirect("fiddlesticks/default.htm")
End Select
%>
Brooks Jucha & Associates