ASP程序设计复习题.doc
习题 1 ：1、名词解释：静态网页、动态网页、服务器端、客户端静态网页：网页文件中，没有程序代码；文件扩展名，一般为 htm或html动态网页：网页文件中含有程序代码；文件扩展名，一般根据不同的程序设计语言而不同。如，ASP 文件的扩展名为 asp服务器端：提供服务的一方客户端：接受服务的一方提示：服务器端与客户端是相对而言的2、小王正在家里通过拨号上网访问搜狐网站，此时，谁是服务器端？谁是客户端？搜狐网站端是服务器端；小王所用微机是客户端3、如果小王正在访问自己计算机上的网站，此时，誰是服务器端？谁是客户端？小王的计算机，既是服务器端，又是客户端4、请简述静态网页的工作原理当在浏览器地址栏中，输入一个网址回车后，就向服务器提出一个网页的请示。服务器端接受到请示后，就会找到你所要网页文件，并发给你。由你的浏览器解释、显示。5、请简述动态网页的工作原理当在浏览器地址栏中，输入一个网址回车后，就向服务器提出一个网页的请示。服务器端接受到请示后，先找到你所要动态网页文件，执行其中的程序代码，并将执行结果，嵌入网页文件中（替代原程序代码） ，然后发给你。由你的浏览器解释、显示。6、请比较 ASP、PHP、JSP 的优缺点简言之，ASP学习简单，使用方便；PHP软件免费，运行成本低；JSP多平台支持，转换方便。习题 21、一个显示来访时间的 ASP 文件，存放在 C:inetpubwwwroot 下，然后在资源管理器双击该文件，却不能正常显示，请问是什么原因？运行ASP 动态网页文件，需要 IIS（Internet 信息服务管理器）支持。在资源管理器双击某文件，仅仅是调用某个程序来打开它。而 ASP 是一种运行环境。提示：在 IIS窗口中，运行 ASP文件，也须单击右键，然后单击“浏览” ，而不是“打开”2、想一想，把一个 HTML网页文件直接更改扩展为 asp 行不行？改变文件扩展名后，操作系统，就将它作为动态网页看待了3、§2.1.2 中讲了如何访问 ASP 文件，如果希望访问 HTML 网页文件，可以用类似方法吗？可以习题 3选择题1、执行 a”6”语句后，a 是字符串型A、字符串型 B、日期型 C、数值型 D、布尔型2、下列哪一个变量名称是正确的？A、111 （第一个是数字） B、ab_1 （正确）C、_sum （第一个不是字母） D、a?b （使用了标点符号）3、请判断下面程序运行完毕后 a 的值<%a=3a=a+5%>A、0 B、3 C、5 D、8（正确）4、请判断下面程序运行完毕后，a、b、c 的值（B）<%a=”1”+”1”b=”1”&”1”c=”1”&1%>A、 ”11”、 11、 11 B、 ”11”、 ”11”、 ”11” C、 11、 ”11”、 2 D、 2、 ”11”、 ”11”提示：这段程序错误，不会被执行。因此，没有结果5、下列哪一个函数可以将数值转换为字符串（C）A、Cdate 转为日期型 B、Cint 整数 C、Cstr D、CDb1 Double6、请问 Mid（”八千里路云和月”,3,2）的返回值是什么？（B）A、 “千里” B、 “里路” C、 “里” D、 “路云”7、请问 Int（3.45）和 Int（3.45）的返回值是什么？（B）A、4、4 B、3、4 C、3、3 D、3、3 实践题1、在个人主页上添加时间显示信息，显示当天的日期、时间及星期几打开本网页的时间是：<%=now%> 星期 <%=weekday(date()%>2、编写程序：掉除字符“ 祖国 ”和“ 万岁 ”两边空格，并连接成字符串“祖国万岁”<% a=Trim(" 祖国 ")b=Trim(" 万岁 ")c=a&bresponse.write c%>3、编写程序，判断当天日期，如果是 25 日，则显示：请注意，明天可能有病毒发作！<%dim datadata=day(date()response.write dataif data=25 thenresponse.write "请注意，明天可能有病毒发作！"elseresponse.write "不是 25 日"end if%>提示：date()返回系统当前的日期。是服务器端系统的日期；格式是20040804。因此，使用day()函数求出是几号4 、用两种循环语句编写程序，计算 S 的值（注意步长）。S=12+32+52+992<%dim i,j,sumsum=0i=1j=2while i<100sum=sum+i2i=i+jwendresponse.write "1 至 99，奇数的平方和" & CStr(sum)%><p align="center"><%dim k,sum1sum1=0k=1do while k<100sum1=sum1+k2k=k+2loopresponse.write "1 至 99，奇数的平方和" & CStr(sum1) %>5、请编写函数计算 a 到 b 的立方和，并举例调用，调用时 a，b 分别为 3和 6<%dim a,ba=3b=6call pingfanghe(a,b)sub pingfanghe(m,n)dim i,sumsum=0i=1while i<=6sum=sum+i3i=i+1wendresponse.write "3 至 6 的立方和" & CStr(sum)end sub%>6、有 100 个和尚吃 100 个馒头，大和尚 1 人吃 4 个，小和尚 4 人吃 1 个，问有多少个大和尚和多少个小和尚？（提示：使用循环嵌套和判断语句）<%dim x,sumsum=0 for x=1 to 25sum=4*x+(100-x)/4if sum>=100 thenexit forend ifnextresponse.write "大和尚有：" & cstr(x) & "个"%><p><%y=100-xresponse.write "小和尚有：" & cstr(y) & "个"%>习题 4选择题1、对于 Request 对象，如果省略获取方法，如 Request(“user_name”)，将按什么顺序集资检查是否有信息传入（B）A、Form、Query String、Cookies、Server Variables、Client CertificateB、Query String、Form、Cookies、Server Variables、Client CertificateC、Cookies、Query String、Form、Server Variables、Client CertificateD、Form、Query String、Cookies、Server Variables、Client Certificate2、Query String 获取方法、Form 获取方法获取的数据子类型分别是：CA、数字、字符串 B、字符串、数字 C、字符串、字符串 D、必须根据具体值而定表 42 中，说明 Query String的功能是“从查询字符串中读取用户提交的数据；例 42 中，说明“因为传送的是字符串”。3、请问下面程序段执行完毕，页面上显示内容是什么：C<%Response.Write “<a href=>新浪</a>”%>A、新浪 B、<a href=>新浪</a>C、新浪（超链接） D、该句有错，无法正常输出4、请问下面程序段执行完毕，页面上显示的内容是什么<%="祖国"="您好"%>显示网页错误。因为用“”输出，一对%与%中，只能有一句5、请问下面程序段执行完毕，页面上显示的内容是什么：A<%Response.Write “春秋”Response.EndResponse.Write “战国”%>A、春秋 B、战国 C、春秋战国 D、春秋（换行）战国因为End是停止处理ASP 程序 问答题1、请叙述 Response 的 Write 方法的两种写法的区别及注意事项：一种是简化写法，如，<%=new()%>。提示：简化写法一对<%、%>之间只能有一个“”2、请问 Redirect 方法和超链接的区别是什么？一般页面上的超链接，需用户单击后，才能转至另一个 URL；而Redirect 方法，是自动转向3、请问当使用 Redirect 方法时，为什么有时要在文件形状加<%Response.Buffer=True %>这句话？加了这句话后，服务器先将页面送至客户端的缓冲区。提示：Windows 2000 操作系统中 Buffer 属性默认为 True。就可不加这句话。实践题1、请将 4-4.asp 和 4-5.asp 修改为一个页面：<div align="center"><h2>请填写个人信息</h2><form name="form1" method="post" action="e4-1.asp"><table width="50%" border="0" align="center"><tr><th width="14%">姓名 </th><td width="86%"><input type="text" name="user_name"></td></tr><tr> <th width="14%">密码</th><td width="86%"><input type="text" name="password"></td></tr><tr><th width="14%">性别</th><td width="86%"><input type="radio" name="sex" value="男">男 <input type="radio" name="sex" value="女">女</td></tr><tr><th width="14%">爱好</th><td width="86%"><input type="checkbox" name="love" value="音乐">音乐 <input type="checkbox" name="love" value="计算机">计算机</td></tr><tr><th width="14%">职业</th><td width="86%"><select name="career" size="1"><option value=" " selected>请选择</option><option value="教育业">教育业</option><option value="金融业">金融业</option><option value="其他">其他</option></select>></td></tr> <tr><th width="14%">简述</th><td width="86%"><textarea name="introduction" cols="40" rows="2"wrasp="soft"></textarea></td></tr><tr><th> </th><td><input type="submit" name="Submit" value="提交"><input type="submit" name="teset" value="重写"> </td></tr></table></form><h2>下面是您的个人信息</h2><%dim user_name,password,sex,love,career,introduction'第一句是 OptionExplicit，因此变量必须先定义，方可使用user_name=Request.Form("user_name")password=Request.Form("password")sex=Request.Form("sex")love=Request.Form("love")career=Request.Form("career")introduction=Request.Form("introduction")%><table width="60%" border="0" align="center"> <tr><td><% Response.Write"姓名：" & user_name%></td></tr><tr><td><% Response.Write"密码：" & password%></td></tr><tr><td><% Response.Write"性别：" & sex %></td></tr><tr><td><% Response.Write"爱好：" & love %></td></tr><tr><td><% Response.Write"职业： " & career %></td></tr><tr><td><% Response.Write"简介：" & introduction%></td></tr><tr><th width="26%">姓名</th><td width="74%"><% =user_name %></td></tr><tr><th>密码</th><td><% =password %></td></tr><tr><th>性别</th><td><%= sex %></td></tr><tr><th>爱好</th><td><% =love %></td></tr><tr><th>职业</th><td><% =career %></td></tr><tr><th>简介</th><td><% =introduction %></td></table></div>提示：上表中对比使用Response 的 Write方法的两种写法的代码2、 请开发一个页面， 显示来访者的IP地址。 并判断： 如果IP地址以162.105开头的，则欢迎信息；否则显示为非法用户，并终止程序<div align="center"><% dim IP,IPCstrIP=Request.ServerVariables("REMOTE_ADDR")Response.Write "来访者地址："& IPIPCstr=left(IP,7)%></div> <p align="center"><%if IPCstr<>"162.105" thenResponse.Write "你是非法用户！"elseResponse.Write "欢迎光临！"end if%>3、请开发一个页面，当客户第一次访问时，需在线注册姓名、性别等信息，然后把信息保存到 Cookies 中。下一次如该客户再访问时，则显示“某某，您好，您是第几次光临本站”的欢迎信息<%dim user_name,password,sex,love,career,introduction,varNumber'第一句是Option Explicit，因此变量必须先定义，方可使用user_name=Request.Form("user_name")password=Request.Form("password")sex=Request.Form("sex")love=Request.Form("love")career=Request.Form("career")introduction=Request.Form("introduction")if user_name="" thenResponse.redirect "e4-3-1.asp"end ifif user_name<>Request.Cookies("MyCookie")("user_name") then Response.Write "您是第一次访问本站！欢迎您光临！"Response.Cookies("MyCookie")("user_name")=user_nameResponse.Cookies("MyCookie")("password")=passwordResponse.Cookies("MyCookie")("sex")=sexResponse.Cookies("MyCookie")("love")=loveResponse.Cookies("MyCookie")("career")=careerResponse.Cookies("MyCookie")("introduction")=introductionResponse.Cookies("MyCookie")("Number")=1 ' 第一次访问，故将Cookies 中的 Number 设置为 1elsevarNumber=Request.Cookies("MyCookie")("Number")varNumber=varNumber+1Response.Write "您是第"& varNumber &"访问本站"Response.Cookies("MyCookie")("Number")=varNumberResponse.Cookies("MyCookie").Expires=#2004-11-30#end if%>4、请开发一个简单的在线考试程序，可以包括若干单选题、多选题，单击交卷按钮后就可以根据标准答案在线评分注，虽说可用一张网页完成上述功能。为了避免在刚才打开网页时，就出现评分数字，使用两张网页。考卷网页<h1 align="center">试 卷</h1><p align="left"> 每题 20分；最后一题是多选题，需要全部选对才能得分</p><form name="form1" method="post" action="e4-4-1.asp"><table width="750" border="1" align="center"><tr><td colspan="4">1、执行 a”6”语句后，是什么类型</td></tr><tr><td width="25%"><input type="radio" name="a1" value="字符串型">A、字符串型</td><td width="25%"><input type="radio" name="a1" value="日期型">B、日期型</td><td width="25%"><input type="radio" name="a1" value="数值型">C、数值型</td><td width="25%"><input type="radio" name="a1" value="布尔型">D、布尔型</td></tr><tr><td colspan="4">2、下列哪一个变量名称是正确的？</td></tr><tr><td width="25%"><input type="radio" name="a2" value="111">A、111</td><td width="25%"><input type="radio" name="a2" value="ab_1">B、ab_1</td> <td width="25%"><input type="radio" name="a2" value="_sum">C、_sum</td><td width="25%"><input type="radio" name="a2" value="a?b">D、a?b</td></tr><tr><td colspan="4">3、下列哪一个函数可以将数值转换为字符串</td></tr><tr><td><input type="radio" name="a3" value="Cint">A、Cdate</td><td><input type="radio" name="a3" value="Cint">B、Cint</td><td><input type="radio" name="a3" value="Cstr">C、Cstr</td><td><input type="radio" name="a3" value="CDb1">D、CDb1</td></tr><tr><td colspan="4"> 4、请问Mid（”八千里路云和月”,3,2）的返回值是什么？</td></tr><tr><td width="25%"><input type="radio" name="a4" value="千里"> A、 “千里”</td><td width="25%"><input type="radio" name="a4" value="里路">B、 “里路”</td><td width="25%"><input type="radio" name="a4" value="里">C、 “里”</td><td width="25%"><input type="radio" name="a4" value="路云">D、 “路云”</td></tr><tr><td colspan="4">5、下述操作中，能够运行一个应用程序是：</td></tr><tr><td><input type="checkbox" name="a5" value="运行">A、用“开始”菜单中的“运行”命令</td><td> <input type="checkbox" name="a5" value="桌面上">B、双击桌面上该程序的图标</td><td> <input type="checkbox" name="a5" value="资源管理器">C、在资源管理器中，双击该程序的文件名</td><td> <input type="checkbox" name="a5" value="文档">D、用“开始”菜单中的“文档”命令</td></tr><tr><td width="25%"> </td><td width="25%"><input type="submit" name="Submit" value="交卷"> </td><td width="25%"><input type="submit" name="Submit2" value="重做"></td><td width="25%"> </td></tr></table></form></td></tr></table>评分网页<table width="750" border="0" align="center"><tr><td> <div align="left"><h1 align="center">成绩报告单 </h1><p><%dim a1,a2,a3,a4,suma1=Request.Form("a1")a2=Request.Form("a2")a3=Request.Form("a3")a4=Request.Form("a4")a5=Request.Form("a5")sum=0 if a1="字符串型" thensum=sum+20end ifif a2="ab_1" thensum=sum+20end ifif a3="Cstr" thensum=sum+20end ifif a4="里路" thensum=sum+20end ifif a5="运行, 桌面上, 资源管理器, 文档" thensum=sum+20end if%><%Response.Write "<b>"if sum<60 thenResponse.Write "你的得分是:" & Cstr(sum) & " 应该努力学习！"elseif sum<80 thenResponse.Write "你的得分是:" & Cstr(sum) & " 仅仅及格是不够的，继续努力！" elseif sum<100 thenResponse.Write "你的得分是:" & Cstr(sum) & " 继续努力，争取满分！"elseResponse.Write "你的得分是:" & Cstr(sum) & " 你真棒！"end ifend ifend ifResponse.Write "</b>"%></p></div></td></tr></table>5、附加题编写统计访问者 IP 地址的程序先是一个 VBScript 过程Sub 子程序<%sub counter0(titlenm)set conn=server.createObject("ADODB.Connection")dbpath=server.mappath("counter/count.mdb")conn.open "driver=Microsoft Access Driver (*.mdb);dbq="&dbpathset ts=server.createobject("ADODB.Recordset")ts.LockType=2sqlstr="select * from count where name='" & trim(titlenm) & "'"ts.open sqlstr,conn if ts.eof thents.addnewts("name")=trim(titlenm)ts("num")=1ts("datatime")=now() '在记录中，添加访问日期时间（字段）elsets("num")=ts("num")+1ts("datatime")=now()end ifts.updatets.closeset ts=nothingset conn=nothingend sub%>下面调用上面Sub 子程序<%dim IP,IPCstrIP=Request.ServerVariables("REMOTE_ADDR")counter0(IP)%>下面是一段利用 session 对象记录用户访问次数的代码<%dim user_name,password,sex,love,career,introduction '第一句是 Option Explicit，因此变量必须先定义，方可使用user_name=Request.Form("user_name")password=Request.Form("password")sex=Request.Form("sex")love=Request.Form("love")career=Request.Form("career")introduction=Request.Form("introduction")if user_name="" thenResponse.redirect "e4-3-1.asp"end ifuser_name=Session("var_name")if user_name="" thenuser_name=1elseuser_name=user_name+1end ifResponse.Write "您是第"& user_name &"访问本站"Session("var_name")=user_name%>习题 5选择题1、Session 对象的默认有效期为多少分钟 ：CA、10 B、15 C、20 D、30 2、在同一个应用程序的页面 1 中执行 Session.Timeout=30，那么在页面 2中执行 Response.Write Session.Timeout，则输出值为多少分钟？：DA、15 B、20 C、25 D、303、Application 对象的默认有效期为多少分钟 ：DA、10 B、15 C、20 D、应用程序从启动到结束4、请问下面程序段执行完毕，c 值为多少 ：B<%Session("a")=1Session("b")=2C= Session("a")+ Session("b")Response.Write c%>A、12 B、3 C、ab D、以上都不对5、请问下面程序段执行完毕，页面上显示的内容是什么 ：B<%Dim strTempstrTemp="user_name"Session("strTemp")="张红"Session(strTemp )="王刚"Response.Write Session("user_name")%>A、张红 B、王刚 C、张红王刚 D、语法有错，无法正常输出 问答题1、如果客户端不支持 Cookies，那么支持 Session 吗？在浏览器 Internet 属性中显示，Cookies 属于“隐私” （选项卡） 。分为：阻止所有Cookies；高；中高；中；低；接受所有 Cookies 等几个档次。设置成阻止所有 Cookies 后，浏览器支持Session。2、请叙述 Session 对象和 Application 对象各处的作用和最主要的区别。Session 对象保存一个客户的信息，是“私有储藏室” ；Application 对象可以保存多个客户的信息，是“公共储藏室”。3、想一想，在示例 54.asp 中怎么知道返回数组的长度（提示：查 P23数组定义）根据53.asp中， “Dim User_name(2)” ，知道是（项目数）长度为 3。4、请问 Global.asa 文件的名称、位置、语法有什么规定？每个应用程序（独立网站）只能有一个 Global.asa 文件，文件名不能改用其他，且必须存放在（网站）根目录中。Global.asa必须使用 asp 的另一种写法， 不能使用<%>写法。 即，<Script Language="VBScript" runat="server"></Script>。5、请问如下 Global.asa 文件程序有何错误？Sub Session_OnStartDim a,b,ca=2b=3c=a+bResponse.Write c end SubGlobal.asa文件是用于存放 Session和 Application 对象事件的程序。实践题1、请在个人主页上加上当前在线人数和总访问人数在站点根目录下，添加一个 Global.asa文件<SCRIPT language="VBScript" runat="server">Sub Application_OnStartApplication.LockApplication("all")=0Application("online")=0Application.UnlockEnd SubSub Application_OnEndApplication.LockApplication("all")-1=0Application("online")-1=0Application.UnlockEnd SubSub Session_OnStartApplication.LockApplication("all")=Application("all")+1Application("online")= Application("online")+1Application.Unlockend sub Sub Session_OnEndApplication.LockApplication("online")= Application("online")-1Application.UnlockEnd Sub</SCRIPT>然后，在主页合适位置添加代码：在线人数：<% =Application("online") %><br>访问总人数：<% =Application("all") %>2、请编写程序实现一个简单的聊天室，要能显示发言人姓名、发言内容和发言时间。建立一个上、下框架网页<frameset rows="193,226"><frame src="e5-2-2.asp"><frame src="e5-2-1.asp"></frameset>上部显示网页显示整个聊天室的全部发言<meta http-equiv="refresh" content="5"> '每 5 秒刷新一次，以便及时显示聊天内容</head><body><%Response.Write Application("show")%> 下部网页聊天者，输入文本后，提交<form name="form1" method="post" action=""><table width="600" border="0" align="center"><tr><td width="120">说</td><td width="360"><textarea name="textfield" cols="60"></textarea></td><td width="120"><input type="submit" name="Submit" value="发送"></td></tr></table></form><%if trim(request("textfield")<>"" thenApplic
