ASP判断客户端浏览器语言自动跳转

<%
dim lan
lan=request.servervariables("http_accept_language")

select case 1

case instr(lan,"zh-cn")
response.redirect("http://www.111com.net/cn/index.asp教程")
'判断客户端是否是中文简体，如果是转向/cn/index.asp

case instr(lan,"zh-tw")
response.redirect("http://www.111com.net/tw/index.asp")
'判断客户端是否是中文繁体，如果是转向/tw/index.asp

case instr(lan,"en")
response.redirect("http://www.111com.net/en/index.asp")
'判断客户端是否是英文，如果是转向/en/index.asp

case instr(lan,"fr")
response.redirect("http://www.111com.net/fr/index.asp")
'判断客户端是否是法文，如果是转向/fr/index.asp

case instr(lan,"de")
response.redirect("http://www.111com.net/de/index.asp")
'判断客户端是否是德文，如果是转向/fr/index.asp

end select

%>

当然如果只有中文和英文页面，那么也可以用if函数来判断。

<%
dim lan
lan=request.servervariables("http_accept_language")

if instr(lan,"zh")>0 then
response.redirect("http://www.111com.net/cn/")
'如果是中文那么转向中文页面
else
response.redirect("http://www.111com.net/en/")
'如果不是中文，那么统一转向英文页面
end if
%>