ASP判斷客戶端浏覽器語言自動跳轉

　　<%
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
%>

From:http://tw.wingwit.com/Article/program/net/201311/14037.html