%@language=vbscript codepage=936 %> <% dim ComeUrl ComeUrl=trim(request("ComeUrl")) if ComeUrl="" then ComeUrl=Request.ServerVariables("HTTP_REFERER") end if if ComeUrl="" then ComeUrl="index.asp" end if %>