<% Dim Newlang, gotourl NewLang=Request("LG") LanguageSet Newlang gotourl=getsess("CurrentURl") if gotourl="" then gotourl="shopdisplaycategories.asp" end if Response.redirect gotourl %>