实验四Response对象的应用.docVIP

实验四 实验名称： Response对象的应用 实验目的： 1、熟练掌握利用Response对象向客户端输出信息的技术； 2、熟练掌握Write和Redirect 方法，编制相关的验证演示程序。 实验内容： 编写一个网页 侦测今天的日期，若为偶数，就重新导向到 网页，显示一个浏览结果；若为奇数，就重新导向到 网页，显示另一个浏览结果。 试编写两个网页select.html和grade.asp。在select.html页面中输出4个多项选择题，题目内容自拟，每个题目均有A、B、C和D四个选项，当用户单击“交卷”按钮时，提交答案给grade.asp页面，grade.asp页面获得表单所提交的数据后，将数据直接输出给客户端，以显示用户对各题所做出的选择，并且在网页上添加一个“返回”超链接，当用户点击“返回”时页面转向select.html。 原理分析： 利用Redirect完成页面的导向以及write来编制相关的验证演示程序。 实验步骤： 1. %@ Language VBScript % % Option Explicit % % Response.Buffer True % % Dim Tmp1, Tmp2, Tmp1 DatePart d,Date 取得今天是几号 Tmp2 Tmp1 Mod 2 Select Case Tmp2 Case 0 Case 1 END Select Response.Redirect % Even.asp代码: % Tmp DatePart d,Date 取得今天是几号 % 今天的日期 % Tmp % 为偶数，故显示这个网页Even.asp Odd.asp的代码: % Tmp DatePart d,Date 取得今天是几号 % 今天的日期 % Tmp % 为奇数故显示这个网页Odd.asp。 2.xuanzeti.htm 人品测试:你是怎么样的人 - 爱情心里测试栏目 form method post action tijiao.asp 向朋友要了一株树苗，种在花园里。在你想像中，它在几年后会长成怎么样子？你将来的生财计划可从这道题略窥一斑。 INPUT type radio value A name ti1 A.开花绮丽的树。 INPUT type radio value B name ti1 B.结满果实的树。 INPUT type radio value C name ti1 C.茂盛扎结的树。 INPUT type radio value D name ti1 D.枯死了。 INPUT type submit value 已选好，看看结论! INPUT type reset value 重新选！ tijiao.asp的代码： %@LANGUAGE VBSCRIPT CODE % dim result,url result request.Form ti1 select case result case “A” url 开花绮丽的树 case “B” url 结满果实的树 case “C” url 茂盛扎结的树 case “D” url 枯死了 case else url 你还没有选择呢 end select response.write url “ a href ’xuanzeti.htm’ 返回 ” % 总结和结果： Response的方法write、Redirect的灵活使用