下为ASP的实现代码
<%
Dim strAcceptLanguage
strAcceptLanguage = Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")
Select Case strAcceptLanguage
Case "zh-cn"
Response.Redirect "繁體中文版的網頁位址"
Case "en-us"
Response.Redirect "英文版的網頁位址"
Case Else
End Select
%>
下为ASP的实现代码
<%
Dim strAcceptLanguage
strAcceptLanguage = Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")
Select Case strAcceptLanguage
Case "zh-cn"
Response.Redirect "繁體中文版的網頁位址"
Case "en-us"
Response.Redirect "英文版的網頁位址"
Case Else
End Select
%>