<%@ Language=VBScript %> <% Dim Categorycode,RedirectURL Categorycode = Request("categorycode") Select Case Ucase(Categorycode) Case "CONTACTUS" RedirectURL = "http://www.bareface.com/contact-us/" Case "ABOUTUS" RedirectURL = "http://www.bareface.com/about-us/" Case "ART01178" RedirectURL = "http://www.bareface.com/terms-and-conditions/" Case "ART01585" RedirectURL = "http://www.bareface.com/careers/" Case else RedirectURL = "http://www.bareface.com/" End Select Response.Status="301 Moved Permanently" Response.AddHeader "Location", RedirectURL %>