<%option explicit%> <% '************************************************* ' VP-ASP Version 5.00 ' Feb 4, 2003 ' Delete set-up for shopa_editdisplay.asp '*************************************************** ShopCheckadmin "" dim returnURL dim Delete returnURL=GetSess("CurrentURL") Delete=GetSess("SpecialFunction") If Delete="Delete" then Delete="Null" else Delete=getlang("LangCommonDelete") end if response.redirect returnURL & "?SpecialFunction=" & Delete %>