<%@ Language=VBScript %> <% dim rValue, locationURL rValue = cstr(trim(Request.QueryString("r"))) if Len(rValue) > 0 then locationURL = "http://www.budde.com.au/reports/findreports.aspx?typeid=4&locid=13&r=" & rValue else locationURL = "http://www.budde.com.au/reports/findreports.aspx?typeid=4&locid=13" end if ' Permanent redirection Response.Status = "301 Moved Permanently" Response.AddHeader "Location", locationURL Response.End %>