<%
dim lan
lan=requestservervariables("http_accept_language")
select case
case instr(lan"zhcn")
responseredirect("教程")
判断客户端是否是中文简体如果是转向/cn/indexasp
case instr(lan"zhtw")
responseredirect("
判断客户端是否是中文繁体如果是转向/tw/indexasp
case instr(lan"en")
responseredirect("
判断客户端是否是英文如果是转向/en/indexasp
case instr(lan"fr")
responseredirect("
判断客户端是否是法文如果是转向/fr/indexasp
case instr(lan"de")
responseredirect("
判断客户端是否是德文如果是转向/fr/indexasp
end select
%>
当然如果只有中文和英文页面那么也可以用if函数来判断
<%
dim lan
lan=requestservervariables("http_accept_language")
if instr(lan"zh")> then
responseredirect("
如果是中文那么转向中文页面
else
responseredirect("
如果不是中文那么统一转向英文页面
end if
%>
