当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP 3.0高级编程(四)

ASP
简单ASP论坛DIY
如何防止页面中的敏感信息被提取
asp创建对象及中文显示解决技巧
基础开发入门级:JSP与ASP的比较
数据库受到限制怎么办?
ASP初学者常犯的几个错误
Asp定时执行操作、Asp定时读取数据库(网页定时操作详解)
ASP优化:非常实用的ASP提速技巧五则
ASP教程:解决ASP脚本运行超时的方法
ASP安全:简单学习ASP连接数据库方法
简单一招用ASP实现对IE地址栏参数的判断
asp控制xml数据库的6段非常的经典代码
ASP进阶:验证身份证号是否正确的代码
ASP教程:使用ASP生成图片彩色校验码
ASP进阶:用ASP判断文件地址是否有效
ASP进阶:用asp做的简单搜索引擎代码
ASP实例 挂QQ的网页源代码ASP/PHP
ASP答疑 解决ASP脚本运行超时的方法
轻轻松松破解开别人ASP木马密码的方法
用ASP操作Access数据库 ADOX的使用

ASP 3.0高级编程(四)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 107 ::
收藏到网摘: n/a

使用ServerVariables集合
    当讨论Request对象内容时,要研究的集合之一就是ServerVariables集合。这个集合包含了两种值的结合体,一种是随同页面请求从客户端发送到服务器的HTTP报头中的值,另外一种是由服务器在接收到请求时本身所提供的值。为显示
ServerVariables集合中值的使用方式,在Request Object页面(Show_request.asp)中,点击“ServerVariables
Examples”链接,打开另外一个页面,如下图所示:

    下图所示窗口显示的是ServerVariables集合中一些非常有用的值的一个子集。


“自引用”页面
    在ServerVariables集合中返回的值包含Web服务器的详细信息和当前页面的路径信息。在任何地方创建一个页面都可使用这些信息。例如创建一个“自引用”页面,此页面能够再次调用自身完成另一项任务,我们可以用以下代码:
    <FORM ACTION=”<% = Request.ServerVariables(“PATH_INFO”) %>” METHOD=”POST”>
    同样的效果可以用HTTP的“SCRIPT_NAME”值获得:
    <FORM ACTION=”<% = Request.ServerVariables(“SCRIPT_NAME”) %>” METHOD=”POST”>
    使用<A>元素打开一个不同页,可以使用:
    ...
    <%
    strFullPath = Request.ServerVariables(“PATH_INFO”)
    ‘Strip off the file name
    strPathOnly = Left(strFullPath, InStrRev(strFullPath, “/”))
    strNextPage = strPathOnly & “pages/next_page.asp”
    %>
    ...
    <A HREF=”<% = strNextPage %>”>Next Page</A>
    ...
    即使原始页面的名称或位置发生变化,这些实例都能正常工作,因为使用了当前页面的路径信息(当然,第二个例子在分离的目标页的名称发生变化时运行会失败)。
    换句话说,如果为搜索引擎的子会话自动建立URL,可以收集ServerVariable的一些值:
    strFullURL = http:// & Request.ServerVariables(“LOCAL_ADDR”) _
                & “:” & Request.ServerVariables(“SERVER_PORT”) _
                & Request.ServerVariables(“PATH_INFO”)
    这将创建一个完整的URL包括端口号(这种情况下,不是标准值80)。例如,结果可能是:
    http://194.74.60.254:1768/thispath/thispage.asp

检测浏览器的版本
    ServerVariables集合中,另外一个有用的值是用户浏览器的用户代理字符串。在“Detecting the Browser Type”页
面(browsertype.asp),使用ServerVariables集合中的“HTTP_USER_AGENT”值来获得用户代理字符串,一些脚本用来解析该信息并寻找生产厂家名称和浏览器版本。
    <%
    strUA = Request.ServerVariables(“HTTP_USER_AGENT”)
    Response.Write “The User Agent string is <B>” & strUA & “</B><P>”
    If InStr(strUA, “MSIE”) Then
        Response.Write “To upgrade your browser go to “_
                    & “<A HREF=” & Chr(34) & http://www.microsoft.com/ie/”_
                    & Chr(34) & “>http://www.microsoft.com/ie/<A></P>”
        intVersion = Cint(Mid(strUA, InStr(strUA, “MSIE”) + 5, 1))
        If intVersion >=4 Then
            Response.Write “You can use Microsoft Dynamic HTML”
        End If
    Else
&n