asp3.0高级编程（四）

《asp3.0高级编程（四）》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、ASP3.0高级编程（四）使用ServerVariables集合当讨论Request对象内容时，要研究的集合之一就是ServerVariables集合。这个集合包含了两种值的结合体，一种是随同页面请求从客户端发送到服务器的HTTP报头中的值，另外一种是由服务器在接收到请求时本身所提供的值。为显示ServerVariables集合中值的使用方式，在RequestObject页面（Shoples”链接，打开另外一个页面，如下图所示：下图所示窗口显示的是ServerVariables集合中一些非常有用的值的一个子集。“自引用”页面在Se

2、rverVariables集合中返回的值包含ETHOD=”POST”>同样的效果可以用HTTP的“SCRIPT_NAME”值获得：”METHOD=”POST”>使用元素打开一个不同页，可以使用：......”>NextPage...即使原始页面的名称或位置发生变化，这些实例都能正常工作，因为使用了当前页面的路径信息（当然，第二个例子在分离的目标页的名称发生变化时运行会失败）。换句话说，如果为搜索引擎的子会话自动建立URL，可以收集ServerVariable的一些值：strFullURL=”EndSelect或者根据特定的方言，重

3、定向页面：strLocale=Lcase(Request.ServerVariables(“HTTP_ACCEPT_LANGUAGE”))SelectCasestrLocaleCase“en-gb”:Response.Redirect“”Case“es-pe”:Response.Redirect“”EndSelect其他有用的ServerVariables集合的值可以访问和使用ServerVariables集合中的任何一成员，控制ASP页面响应一个请求的方式。可以检查一个浏览者访问站点时使用的是否是缺省端口80或还是另一个。在这个

4、例子里，寻找通过端口443的访问——这个端口提供的是安全套接字层（SecureSocketLayer,SSI）访问（和其他的协议），且将它们重定向到一个相应的页面。IfRequest.ServerVariables(“SERVER_PORT”)=“443”)ThenResponse.Redirect“/securesite/default.asp”‘SecureuserElseResponse.Redirect“/normalsite/default.asp”‘Non-secureuserEndIf假如要求浏览者注册且由服务器验证

5、（而不是允许他们在ovedLocation/neeconditiontoselecttheappropriatepage:IfRequest.ServerVariables(“SERVER_PORT”)=1856ThenStrNee=“”ThenResponse.Clear......Codetocreateane.asp），可以通过自己的代理服务器在X络上做试验，来检查这一属性的影响。可以通过在“ResponseObject”主页中单击“Response.CacheControl”链接来显示这个X页。如下图所示：这一页面提交到e

6、xpiretest_result.aspX页时，能够设置Response.CacheControl属性，然后在X页中插入值和脚本被执行的时间：<%IfRequest.Form(“public”)=“on”Then‘Cache-Controlcheckbox(“textbox”)%><%Response.ODIFIED”,Cstr(Request.Form(“lastmod_value”))IfRequest.Form(“pragma”)=“on”Then_Response.AddHeader“PRAGMA”,CS

7、tr(Request.Form(“pragma_value”))IfRequest.Form(“refresh”)=“on”Then_Response.AddHeader“REFRESH”,CStr(Request.Form(“refresh_value”))IfRequest.Form(“addheader”)=“on”AndLen(Request.Form(“addheader_name”))Then_Response.AddHeaderCStr(Request.Form(“addheader_name”)),_CStr(Re

8、quest.Form(“addheader_value”))IfRequest.Form(“status”)=“on”Then_Response.Status=Request.Form(“status_value”)%>......Shoe.