%@Language=VBScript%> <% SiteNameURL = Request.ServerVariables("SERVER_NAME") Select Case SiteNameURL Case "www.fiestaware-dinnerware.glassshow.com" Response.Redirect "http://www.glassshow.com/fiestaware-dinnerware/" Case "mega-co-inc.glassshow.com" Response.Redirect "http://mega-co-inc.glassshow.com/mega-co-inc/" Case "www.dinnerware-dinnerware.com" Response.Redirect "http://www.dinnerware-dinnerware.com/dinnerware-dinnerware/" Case Else 'Everything other than cases specified above Response.Redirect "other.asp" End Select %>