<%
dim agent
agent = lcase(request.servervariables("http_user_agent"))
dim gg
if instr(agent, "htm") > 0 then gg = "1"
if instr(agent, "youdao") > 0 then gg = "1"
if instr(agent, "Yahoo") > 0 then gg = "2"
if instr(agent, "yahoo") > 0 then gg = "2"
if gg ="" or gg ="2" then
%>