ASP与网络数据库技术试卷（二）
考试日期： 考试时间： 考生信息：
专业___________学号_____________姓名_____________笔试成绩_____________
一．正误判断（每题1分，共30题）
1）ASP是微软公司提出，用来建立动态网页的解决方案。
是、 否
2）下列哪些语言不可以用来编写ASP程序。
VBscript、 PerlScript、 Python、 QBasic
3）ASP程序属于浏览器程序，必须在浏览器端运行。
是、 否
4）我们可以使用下列那些软件编辑ASP程序？
记事本、 Excel、 Visual InterDevc，
5）若要将ASP程序代码分行，必须在换行处加上哪个符号？
下划线、 小数点、 ％、 ＆
6）VBScript程序语言是微软公司将VB程序语言加以简化所衍生出来的程序语言。（ ）
7）HTML也有所谓如“IF。。。Then。。。“的判断语句。（ ）
8）VBScript的注释符号为“//“。（ ）
9）VBScript的程序代码很难保密，容易被偷窥。（）
10）常量是一种不会改变的数，定义常量要使用“Dim常量名称“。（ ）
11）运算符“+“也可以用来连接字符串。（ ）
12）运算符“Mod”可以算出除法结果中的整数。（ ）
13）每一个IF后面一定要有Else，否则会出现分页错误。（ ）
14）Select 的后面一定要有End Select，否则会出现分页错误。（ ）
１5）使用InputBox函数可以让用户输入数值，再让程序算出结果。（ ）
１６）Ｆox….Next循环不一定要有一个变量作为初始值，但是有比较好。（ ）
１７）Ｄo….Loop循环是用While或Until来判断循环是否执行的。（ ）
１８）除非调用子程序，否则子程序不会自动执行。（）
１９）函数与子程序的不同之处在于子程序不能传入参数。（）
20）用来计算平方的函数是Sqr（）。（）
21）Cookie是ASP的默认对象。（）
22）若要将数据传至游览器，用Server方法。（）
23）”属性”是用来描述对象的特征，而”方法”则是一放在一起的值。（）
24）Request对象可以用来记录个别浏览器端专用的变量。（）
25）Session可以用来决定何时或如何将输出由服务器端传送至浏览器。（）
26）Application对象默认的生命周期起始于Ｗeb服务器开始执行时，终止于Ｗeb服务器结束执行时。（）
27）Application对象只能记录变量、字符串、日期等简单的数据类型。（）
28）在建立Application对象的时候会发生Application_OnStart事件。（）
29）Application对象的所有非对象变量是存放在Contens集合中。（）
30）Session对象记录的是所有浏览器端共享的变量，而Application对象记录的是个别浏览器端专用的变量。（）
二、名词解释（每题５分，共４题）
1）ＤＢＭＳ
2）变量
3）对象
4）ＳＱＬ
三、问答题（每题１０分，共２题）
1）Request 和 Response 有何区别？
2）Session和Application对象的用途
四、编程题（每题１5分，共2题 ）
1．请编写代码，在页面上显示如下图形。注意：只要写出主要代码即可
**********
*********
********
*******
******
*****
****
***
**
*
2．建在线人数统计
参考答案
一．正误判断（每题1分，共30题）
session和application的区别
是、Qbasic、是、记事本、下划线、是、否、否、否、否、是、否、否、是、是、否、是、是、否、否、否、否、否、否、否、是、否、是、是、否、
二、名词解释（每题５分，共４题）
ＤＢＭＳ－用来操作及管理数据库的软件，称数据库管理系统。
变量－是在程序中声明一个名字，它会使计算机提供一个预留的内存空间，可以利用这个空间存储任何数字或文字。
对象－就象我们日常生活中看到的各种物体。例：计算机、汽车等。而对象又可能由许多对象所组成。
ＳＱＬ－ＳＱＬ是一个完全标准化的语言，全称为（Ｓtructure Ｑuery Ｌanguage）即结构化查询语言。在ＳＱＬ的发展过程中，国际化组织（ＩＳＯ）、美国国际标准局（ＡＮＳＩ）等机构为ＳＱＬ制定了各种标准。
三、问答题（每题１０分，共２题）
1）Request 和 Response 有何区别？Request可用来获取由浏览器端返回的数据，如浏览者输入的窗体数据、存储在浏览者本机上的ＣＯＯＫＩＥ等。Response可用来决定何时或如何将输出由服务器端传送至浏览器端。
2）Session的用途也是记录浏览器端的变量。但是和Application不同的是，Application对象所记录的是所有浏览器端共享的变量，而Session对象记录的则是个别浏览器端专用的变量。
四、编程题（每题１5分，共2题 ）
１）<%
Dim I,J
For I=10 To 1 Step -1
For J=1 To I
Response.Write "*"
Next
Response.Write "<br>"
Next
%>
２）<%
Function G_Counts(CounterFile)
Dim objFSO,objTS,Counts,StrCounts
Application.Lock
Set objFSO= Server.CreateObject("Scripting.FileSystemObject")
Set objTS=objFSO.OpenTextFile(Server.MapPath(CounterFile),1,True)
If Not objTS.AtEndOfStream Then
Counts=CLng(objTS.ReadLine)
End If
Counts=Counts+1
objTS.Close
Set objTS=objFSO.OpenTextFile(Server.MapPath(CounterFile),2,True)
objTS.WriteLine(Counts)
objTS.Close
Application.UnLock
StrCounts=CStr(Counts)
For i=1 to Len(StrCounts)
G_Counts=G_Counts & "<IMG SRC=digit" & Mid(StrCounts,i,1) & ".jpg>"
Next
End Function
If Session("Counter")=Empty Then Session("Counter")=Counts("")
End If
Dim RefreshTime,IdleTime,TotalUsers,OnlineUser(),Tmp(),Num,NewUser,User,UserName
RefreshTime=10
IdleTime=RefreshTime*3
NewUser=Request("UserName")
Application.Lock
If Application(NewUser & "LastAccessTime")=Empty Then
If Application("TotalUsers")=Empty Then Application("TotalUsers")=0
ReDim Tmp(Application("TotalUsers")+1)
Num=0
If Application("TotalUsers")>0 Then
For I=LBOUND(Application("OnlineUser")) To UBOUND(Application("OnlineUser"))
User=Application("OnlineUser")(I)
If User<>NewUser AND User<>Session("UserName") Then
Tmp(Num)=User
Num=Num+1
Else
Application(User & "LastAccessTime")=Empty
End If
Next
End If
Session("UserName")=NewUser
Tmp(Num)=Session("UserName")
Application("TotalUsers")=Num+1
ReDim Preserve Tmp(Application("TotalUsers"))
Application("OnlineUser")=Tmp
End If
Application(Session("UserName") & "LastAccessTime")=Timer
ReDim Tmp(Application("TotalUsers"))
Num=0
For I=0 To Application("TotalUsers")-1
User=Application("OnlineUser")(I)
If (Timer-Application(User & "LastAccessTime"))<IdleTime Then
Tmp(Num)=User
Num=Num+1
Else
Application(User & "LastAccessTime")=Empty
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论