<%
response.charset = "UTF-8"
Session.CodePage = 65001
Dim temp
Dim temp2
temp = Request.ServerVariables("http_referer")
if Instr(temp,"?") <>0 then
temp = Left(temp,InStr(temp,"?")-1)
end if
if Instr(temp,"#") <>0 then
temp = Left(temp,InStr(temp,"#")-1)
end if
%>
<%
if temp = "" then
temp="quicksearch1.asp"
end if
%>
