asp使用ServerVariables集合（3）

检测浏览器的语言

ServerVariables集合中另外一个有用的值是“HTTP_ACCEPT_LANGUAGE”，它包含了一个当浏览器安装时指定的，或硬编码进用户的地区版本的语言代码。语言代码的例子有en-us（英国、美国）、de-at（德国、澳大利亚）和es-pe（西班牙、秘鲁）。

语言代码可以是一般的且省略方言标识：例如，在我们的站点Wrox者，大批浏览者都是将en（英语）作为语言代码。

因此，可以检测语言代码并自动装载一个合适的特定地区或指定语言版本的页面。 
     

StrLocale = Lcase(Left(Request.ServerVariables(“HTTP_ACCEPT_LANGUAGE”),2)) 
     Select Case strLocale 
     Case “en”: Response.Redirect “http://uk_site.co.uk/” 
     Case “de”: Response.Redirect “http://de_site.co.de/” 
     Case “fr”: Response.Redirect “http://fr_site.co.fr/” 
     ‘... etc 
     Case Else: Response.Redirect “http://us_sitel.com/” 
     End Select 

或者根据特定的方言，重定向页面： 
    

strLocale = Lcase(Request.ServerVariables(“HTTP_ACCEPT_LANGUAGE”)) 
     Select Case strLocale 
     Case “en-gb”: Response.Redirect “http://uk_site.co.uk/” 
     Case “en-us”: Response.Redirect “http://us_site.com/” 
     Case “es-pe”: Response.Redirect “http://es_site2.co.pe/” 
     ‘... 
     Case Else: Response.Redirect “http://us_site1.com/” 
     End Select 

其他有用的ServerVariables集合的值

可以访问和使用ServerVariables集合中的任何一成员，控制ASP页面响应一个请求的方式。可以检查一个浏览者访问站点时使用的是否是缺省端口80或还是另一个。在这个例子里，寻找通过端口443的访问——这个端口提供的是安全套接字层（Secure Socket Layer,SSI）访问（和其他的协议），且将它们重定向到一个相应的页面。

If Request.ServerVariables(“SERVER_PORT”) = “443”) Then 
     Response.Redirect “/securesite/default.asp” ‘Secure user 
     Else 
     Response.Redirect “/normalsite/default.asp” ‘Non-secure user 
     End If 

假如要求浏览者注册且由服务器验证（而不是允许他们在Web服务器的IUSER帐号下匿名访问，这个问题将在后面章节中详细讨论），可以查询用户名称，来判定正在与我们打交道的用户是谁，是否装载页面给该用户。例如，下面的这个代码将只向名为Administrator的用户显示管理链接。 
     

... 
     <A HREF=”dispcnfg.asp”>Change Display Configuration</A> 

     <A HREF=”dispcolr.asp”>Change Display Colors</A> 
     
     <A HREF=”keyboard.asp”>Change Keyboard Configuration</A> 

     <％ 
     If Request.ServerVariables(“AUTH_USER”) _ 
     = Ucase(Request.ServerVariables(“SERVER_NAME”)) & “Administrator” Then 
     ％> 
     <A HREF=”allusers.asp”>Administer All Users</A> 
     
     <A HREF=”usrlogon.asp”>Administer Logon Information</A> 
     <％ 
     End If 
     ％> 
     ... 

注意ASP不填写ServerVariables集合直到你访问其中的一个成员。首次访问该集合的一个成员将使IIS得到它的全部，应只在需要时才使用ServerVariables集合。