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

select case 1

case instr(lan,"zh-cn")
response.redirect("http://www.3lian.com//cn/index.asp教程")
'判斷客戶端是否是中文簡體，如果是轉向/cn/index.asp

case instr(lan,"zh-tw")
response.redirect("http://www.3lian.com//tw/index.asp")
'判斷客戶端是否是中文繁體，如果是轉向/tw/index.asp

case instr(lan,"en")
response.redirect("http://www.3lian.com//en/index.asp")
'判斷客戶端是否是英文，如果是轉向/en/index.asp

case instr(lan,"fr")
response.redirect("http://www.3lian.com//fr/index.asp")
'判斷客戶端是否是法文，如果是轉向/fr/index.asp

case instr(lan,"de")
response.redirect("http://www.3lian.com//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.3lian.com/")
'如果是中文那么轉向中文頁面
else
response.redirect("http://www.3lian.com/")
'如果不是中文，那么統一轉向英文頁面
end if
%&