动态网站设计十八般武艺 —

ASP 篇（七）

在上一篇中作者给大家详细介绍了 ASP 内建对象之一 Request 的使用方法，相信各位通过一系列的实践已经能够熟练掌握，本篇将继续给大家介绍 ASP 的另一个内建对象 Response。

最近，有很多朋友来“妹儿”催我加快 ASP 篇一文的写作速度，并急切地询问哪里有关于 ASP 的教材。我深深地被大家的学习热情所打动，因此决定将自己平时所搜集的一些 ASP 信息资料拿出来和大家共享，也希望所有的朋友能慷慨地将自己搜集的有关 ASP 的资料告诉作者，谢谢。由于目前国内有关 ASP 的中文教材凤毛麟角，而专门针对 ASP 网站开发的中文教材作者更是闻所未闻（可能是作者孤陋寡闻），只是最近听说出了一本清华大学出版社出版的关于 MS InterDev 的傻瓜书，其中有 ASP 的教学，和一本 Active Server Page 2.0 的中文手册，因此目前作者还是主要通过国外网站来获取 ASP 的有关信息和资料，这也是作者写本文的一个主要原因。下面我就将 bookmark 中的一些较经典的 ASP 站点罗列出来：

　　 1、http://www.activeserverpage.com/

　　这是作者访问最频繁的 ASP 网站，也是世界上最大最全的关于 ASP 的网站之一，它里面不但有最新的 ASP 文献资料，免费组件，还有一本完整的 ASP 入门教材，它更是 ASP 网站的中枢站点，通过它你可以到达无数的 ASP 相关站点。

　　 2、http://www.asphole.com/

　　这本是一个针对 ASP 漏洞而建立的站点，但是它却无疑是一个完备的 ASP 信息站点，它非但提供了 ASP 的文章，及组件还提供详尽透彻的联接地址。

　　 3、http://www.15seconds.com/faq 和 http://www.15seconds.com/search

　　这是一个作者所看到的最大的网上 ASP 交流站点，它拥有 ASP 解疑的答案，ASP 邮件清单信息，ASP 技巧，你可能需要需要几个月的时间才能读完这些信息。而在 http://www.15seconds.com/AllComponents.asp 你可以读到最新的 ActiveX 组件和大量免费组件的详细介绍，并附有非常实用的文档与例子。

　　 4、http://www.microsoft.com/workshop/server/asp/aspfeat.asp

　　大家都知道 Active Server Page 是微软提出的一套基于 NT IIS 的 WEB 服务器端环境，那么这个由微软自己建立的 ASP 技术说明站点，大家当然是不可不看的。

　　 5、http://www.serverobjects.com/

　　在这里你可以获得无数实用的 ActiveX 组件 , 并下载它们的试用版，只可惜其中的大部分极好的组件都是要 Money 的。

　　 6、http://www.cyscape.com/asp/browscap/

　　大家还记得作者在 ASP2 一文中介绍的那个用来辨别客户端浏览器版本的 Browser Capabilitie 组件吗？在这个站点你可以获得最新的 BROWSCAP.INI 文件，它拥有每一个 ASP 安装时微软没有提供的浏览器的信息，这样你在 ASP 中判断客户浏览器是就能够万无一失了。

　　 7、http://www.microsoft.com/data/ado/

　　 ASP 最强大且便捷的功能莫过于同数据库的连接，通过 ASP 内建的 ActiveX 组件，我们可以轻而易举的将 WEB 与所有和 ODBC 兼容的数据库连接起来，在这个微软的站点上你可以获取很多实用的 ADO 资料。

　　 8、http://www.cobb.com/m_sbn4/

　　一个不错的 ASP 论坛，你可以在那里贴你的问题，读取别人的问题和解答。

　　下面，我们开始学习 ASP 的另一个内建对象 Response。

　　与 Request 是获取客户端 HTTP 信息相反 ,Response 对象是用来控制发送给用户的信息，包括直接发送信息给浏览器、重定向浏览器到另一个 URL 或设置 cookie 的值。

　　语法

　　 Response.collection|property|method

　　一、属性

　　 1、Buffer

　　 Buffer 属性指示是否缓冲页输出。当缓冲页输出时，只有当前页的所有服务器脚本处理完毕或者调用了 Flush 或 End 方法后，服务器才将响应发送给客户端浏览器，服务器将输出发送给客户端浏览器后就不能再设置 Buffer 属性。因此应该在 .asp 文件的第一行调用 Response.Buffer。

　　 2、Charset

　　 Charset 属性将字符集名称附加到 Response 对象中 content-type 标题的后面。对于不包含 Response.Charset 属性的 ASP 页，content-type 标题将为 :content-type:text/html。

　　我们可以在 .asp 文件中指定 content-type 标题，如 :

　　 < % Response.Charset="gb2312") %>

　　将产生以下结果 :

　　 content-type:text/html; charset=gb2312

　　注意，无论字符串表示的字符集是否有效，该功能都会将其插入 content-type 标题中。且如果某个页包含多个含有 Response.Charset 的标记，则每个 Response.Charset 都将替代前一个 CharsetName。这样，字符集将被设置为该页中 Response.Charset 的最后一个实例所指定值。

　　 3、ContentType

　　 ContentType 属性指定服务器响应的 HTTP 内容类型。如果未指定 ContentType，默认为 text/HTML。

　　 4、Expires

　　 Expires 属性指定了在浏览器上缓冲存储的页距过期还有多少时间。如果用户在某个页过期之前又回到此页，就会显示缓冲区中的页面。如果设置 response.expires=0，则可使缓存的页面立即过期。这是一个较实用的属性，当客户通过 ASP 的登陆页面进入 WEB 站点后，应该利用该属性使登陆页面立即过期，以确保安全。

　　 5、ExpiresAbsolute

　　与 Expires 属性不同 ExpiresAbsolute 属性指定缓存于浏览器中的页面的确切到期日期和时间。在未到期之前，若用户返回到该页，该缓存中的页面就显示。如果未指定时间，该主页在当天午夜到期。如果未指定日期，则该主页在脚本运行当天的指定时间到期。如下示例指定页面在 1998 年 12 月 10 日上午 9:00 分 30 秒到期。

　　 < % Response.ExpiresAbsolute=#Dec 12,1998 9:00:30# %>

　　二、方法

　　 1、Clear

　　可以用 Clear 方法清除缓冲区中的所有 HTML 输出。但 Clear 方法只清除响应正文而不清除响应标题。可以用该方法处理错误情况。但是如果没有将 Response.Buffer 设置为 TRUE，则该方法将导致运行时错误。

　　 2、End

　　 End 方法使 Web 服务器停止处理脚本并返回当前结果。文件中剩余的内容将不被处理。如果 Response.Buffer 已设置为 TRUE，则调用 Response.End 将缓冲输出。

　　 3、Flush

　　 Flush 方法立即发送缓冲区中的输出。如果没有将 Response.Buffer 设置为 TRUE，则该方法将导致运行时错误。

　　 4、Redirect

　　 Redirect 方法使浏览器立即重定向到程序指定的 URL。这也是一个我们经常用到方法，这样程序员就可以根据客户的不同响应，为不同的客户指定不同的页面或根据不同的情况指定不同的页面。一旦使用了 Redirect 方法任何在页中显式设置的响应正文内容都将被忽略。然而，此方法不向客户端发送该页设置的其他 HTTP 标题，将产生一个将重定向 URL 作为链接包含的自动响应正文。Redirect 方法发送下列显式标题，其中 URL 是传递给该方法的值。如:

　　 < % Response.redirect("www.chinabyte.com") %>

　　 5、Write

　　 Write 方法是我们平时最常用的方法之一，它是将指定的字符串写到当前的 HTTP 输出。

　　三、集合

　　 Response 对象只有一个集合 --Cookie

　　 Cookies 集合设置 cookie 的值。若指定的 cookie 不存在，则创建它。若存在，则设置新的值并且将旧值删去。

　　语法

　　 Response.Cookies(cookie)[(key)|.attribute]=value

　　这里的 cookie 是指定 cookie 的名称。而如果指定了 key，则该 cookie 就是一个字典。attribute 指定 cookie 自身的有关信息。attribute 参数可以是下列之一 :

　　 Domain 若被指定，则 cookie 将被发送到对该域的请求中去。

　　 Expires 指定 cookie 的过期日期。为了在会话结束后将 cookie 存储在客户端磁盘上，必须设置该日期。若此项属性的设置未超过当前日期，则在任务结束后 cookie 将到期。

　　 HasKeys 指定 cookie 是否包含关键字。

　　 Path 若被指定，则 cookie 将只发送到对该路径的请求中。如果未设置该属性，则使用应用程序的路径。

　　至此，我们已经学习的 Response 对象的所有属性、方法和集合的理论知识，下面作者将给大家演示一段简单的程序，通过实践让大家加深理解。先将以下程序剪贴到记事簿中，并保存为 asp7.asp。( 注意将 < 和 % 之间的空格去掉 !!!)
　　< %
　　Dim user
Dim flag
Dim pwd
　　Dim say
Response.buffer=true ' 开启缓冲页面功能
Response.ContentType="text/HTML"
　　Response.Charset="gb2312"
　　user=Request.Form("username")
pwd=Request.Form("password")
say=Request.QueryString("say")
%>
　　< form method="POST" action="asp7.asp">
　　< p> 用户名 :< input type="text" name="username" size="12">< br>
　　口令 :< input type="password" name="password" size="12">< br>
　　< input type="submit" value=" 提交 " name="B1">< input type="reset" value=" 取消 " name="B2">< /p>< /form>
　　< %
　　If say=1 then
　　Response.Write " 欢迎书生大驾光临 !"
End If
　　If say > 1 then
　　Response.Write " 欢迎再次光临书生的 ASP 网站 !"
End If
　　If user="Adm" and pwd="shusheng" Then
　　Response.Expires=1 ' 设置该页面在浏览器的缓冲中存储 1 分钟后过期。
　　flag=1
　　ElseIf user="guest" and pwd="guest" Then
　　Response.Expires=0 ' 使缓存的页面立即过期。
　　Response.Clear ' 清空存储在缓存中的页面
　　flag=2
　　ElseIf user="vip" and pwd="vip" Then
　　Response.Write " 欢迎 VIP 光临书生的 ASP 网站 "
　　flag=3
　　Else
　　flag=0
　　Response.End ' 立即停止脚本处理，并将缓存中的页面输出
End If
　　Response.write "< p>< a href='asp7b.asp?flag="&flag&"'> 动态网站设计十八般武艺 --ASP 篇 (7) 实践练习 < /a>< /p>"
' 将变量 flag 的值传送给 asp7b.asp
　　%>
　　< p> 动态网站设计十八般武艺 --ASP 篇 (7) 实践练习 < /p>

　　再将以下程序保存为 asp7b.asp。
　　< %
　　Dim saysay=Request.QueryString("flag")
Select case say
　　case "1"
　　Response.Redirect "asp7.asp?say=1"
case "2"
　　Response.Redirect "asp7.asp?say=2"
case "3"
　　Response.Redirect "asp7.asp?say=3"
case "0"
　　Response.Redirect "asp7.asp?say=0"
End Select
　　%>

　　将这两个程序放在有执行权限的 WEB 虚拟目录下，并以 http 方式访问 asp7.asp。在这两个程序中我们充分运用了至今为止所学过的两个 ASP 内建对象 :Request 和 Response。当你第一次访问 asp7.asp 文件时，页面上出现一个 Form 并提示输入用户名和口令，如果你输入用户名 :Adm、口令 :shusheng, 则会出现如下页面 :

　　如果你输入用户名 :guest、口令 :guest, 则仅出现如下页面 :

　　这是为什么呢？因为我们设置了页面缓存，当使用 guest 登陆时，判断程序自动清空其之前所有存储在缓存中的页面，而仅将其后脚本程序执行的结果显示出来。

　　那为什么第一次登陆 asp7.asp 页面时仅仅只显示一个 Form 对话框呢？因为此时程序判断到用户既非 Adm, 也不是 guest 和 vip，所以执行 Response.End, 立即将存储在缓存中的 Form 显示出来，并停止其后的一切脚本处理，包括纯 HTML 代码的显示。

　　无论你是用 Adm 还是 guest 或 vip 登陆该页面你都可以看到一个超链，该超链指向文件 asp7b.asp，当我们点击该超链时，asp7.asp 将变量 flag 的值作为参数发送给 asp7b.asp, 而后者则根据该参数的值来做出判断，并依据不同情况使用 Response.Redirect 再强行返回 asp7.asp, 并也将一个变量 say 的值作为参数发送给 asp7.asp。如此一来，asp7.asp 又会根据此参数来做出不同的反应。

　　大家现在都看到了我们仅仅用了两个很简单的程序，就可以做到对同一个页面的多种不同显示结果，这正是 ASP 的魅力所在，各位可以以此示范程序为基础，来进行一些改动，以熟练掌握我们所学的这两个内建对象。今天的课程就到此为止了，在结尾我还要说明两件事。第一，很多朋友来信询问哪里可以看到 ASP 篇的前几篇文章，请大家点击此处便可以找到。第二，一些朋友反映文中的 ASP 程序不能运行，这主要是因为 Chinabyte 的页面都是用数据库生成的，它限定在文章中不能使用带 HTML 或 ASP 格式的代码，所以在所有 < 符号后都加了空格，各位只要将 < 后的空格去掉就可以运行程序了，切记。下一篇我们将继续学习另一个 ASP 内建对象，敬请关注。