<% Dim HTTPHost HTTPHost = Lcase(Request.ServerVariables("HTTP_HOST")) If HTTPHost = "www.meridiansystemsinc.com" then Response.Redirect ("http://www.zwiener.com/meridian") End If %>