<% 'usage /sourcecode.asp?code=test&URL=/index.asp Dim sSrcCode Dim redirectURL sSrcCode = getRequestValue("code") redirectURL = getRequestValue("URL") If sSrcCode <> "" then deleteCookie SOURCECODE_COOKIE setCookie SOURCECODE_COOKIE, sSrcCode, 1 end if If redirectURL = "" then Response.Redirect HTTP_HOST & "index.asp" else Response.Redirect redirectURL end if %>