<%response.buffer=true%> <% Dim theSRV theSRV = Request.ServerVariables("SERVER_NAME") Select Case theSRV Case "www.acmf.com.au" Response.Redirect("/index.html") Case "http://acmf.com.au" Response.Redirect("http://www.acmf.com.au/index.html") Case "www.nhplcolour.com.au" Response.Redirect("/nhpl") Case "www.nhpl.com.au" Response.Redirect("/nhpl") End Select %> }