在你首页前面加入以下代码，或者将网站首页设置为如下代码的ASP文档：
<%
dim lan
lan=Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")
select case 1
case instr(lan,"zh-cn")
response.Redirect("http://www。iCoA。cn/cn/index.asp")
’判断客户端是否是中文简体，如果是转向/cn/index.asp
case instr(lan,"zh-tw")
response.Redirect("http://www。iCoA。cn/tw/index.asp")
’判断客户端是否是中文繁体，如果是转向/tw/index.asp
case instr(lan,"en")
response.Redirect("http://www。iCoA。cn/en/index.asp")
’判断客户端是否是英文，如果是转向/en/index.asp
case instr(lan,"fr")
response.Redirect("http://www。iCoA。cn/fr/index.asp")
’判断客户端是否是法文，如果是转向/fr/index.asp
case instr(lan,"de")
response.Redirect("http://www。iCoA。cn/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。iCoA。cn/cn/")
’如果是中文那么转向中文页面
else
response.redirect("http://www。iCoA。cn/en/")
’如果不是中文，那么统一转向英文页面
end if
%> |
