动态网页制作作业含答案.docx

1、动态网页制作作业含答案动 态 网 页 制 作 作 业姓名：常小梅动态网页制作作业一、选择题（每小题2分，共40分）1请判断下列语句执行完毕后，a、b、c的值 （B）(A) 11,11,11 (B) 2,11,11 (C) 11,2,11 (D) 11,11,22执行完语句a=2，a的类型为 （B）(A) 数值型 (B) 字符串型 (C) 布尔型 (D) 日期型3执行完如下语句后，a的值为： （D）(A) 0 (B) 1 (C) 3 (D) 44执行完如下语句后，Sum的值为： （C）(A) 0 (B) 5 (C) 15 (D) 205执行完 a=5 Mod 3 语句后，a的值为： （B）(A)

2、 0 (B) 2 (C) 3 (D) 56执行完 a=53 And ac 语句后，a的值为： （A）(A) True (B) False (C) 1 (D) 07下面 a=Trim( vbscript) & Rtrim( good) 语句后，a的值： （B）(A) vbscript good (B) vbscript good (C) vbscriptgood(D) vbscriptgood8下面哪个函数可以返回当前的日期和时间： （A）(A) Now (B) Date (C) Time (D) DateTime9对于利用 Dim a(4,5) 语句定义的二维数组，Ubound(a,1)将返回

3、 （B）(A) 0 (B) 4 (C) 5 (D) 610对于Request对象，如果省略获取方法，如Request(“user_name”)，将按什么顺序依次检查是否有信息传入： （B）（A）Form、QueryString、Cookies、Server Variables、ClientCertificate（B）QueryString、Form、Cookies、Server Variables、ClientCertificate （C）Cookies、QueryString、Form、Server Variables、ClientCertificate （D）Form、QueryStrin

4、g、Cookies、Server Variables、ClientCertificate11下面哪条语句可以返回访问者的IP地址 （A）(A) Request.ServerVariables(REMOTE_ADDR)(B) Request.ServerVariables(REMOTE_IP)(C) Request.ClientCertificate(REMOTE_ADDR )(D) Request.ClientCertificate (REMOTE_IP )12执行完如下语句后，页面上显示的内容为： （A）C (A) A (B) AB (C) AC (D) ABC13请问下面程序段执行完毕，页

5、面上显示内容是什么： （C）%Response.Write “新浪”%(A) 新浪 (B) 新浪(C) 新浪（超链接） (D) 该句有错，无法正常输出14Session对象的默认有效期为多少分钟？ （C）(A) 10 (B) 15 (C) 20 (D) 应用程序从启动到结束15请问下面程序段执行完毕，页面上显示内容是什么： （B）%Response.Write Server.HTMLEncode(“新浪”)%(A) 新浪 (B) 新浪(C) 新浪（超链接） (D) 该句有错，无法正常输出16当使用事务处理时，假如要提交事务处理，应该利用如下方法： （C）(A) BeginTrans (B) E

6、ndTrans (C) CommitTrans (D) RollBackTrans17如果刚打开了一个含有1条记录的记录集，那么 Bof的值为 （C）(A) 1 (B) True (C) False (D) NULL18使用W3 Jmail组件发送E-mail时，附件必须位于 （B）(A) 客户端 (B) 服务器端 (C) 服务器端和客户端 (D) 服务器端或客户端19对于文件上传组件，如果希望获取上传文件的大小，应该怎样用？ （A）(A) Upload.Files(upfile).Size(B) Upload.Form(upfile).Size (C) Request.Files(upfil

7、e).Size (D) Request.Form(upfile).Size20对于如下的文件超链接组件中使用的超链接数据文件，文件路径和说明之间应该用（ B ）隔开。webcourse/www_1.htm 第一讲利用工具软件制作网页webcourse/www_2.htm 第二讲网页制作高级功能webcourse/www_3.htm 第三讲利用源代码开发网页(A) 空格 (B) Tab (C)   (D) Space二、填空题（每空1分，共40分）1.ASP文件就是在普通的HTML文件中插入 VBScript 或JavaScript脚本语言。2.如果操作系统是Windows 2000，

8、一般需要安装 IIS 组件才能运行ASP程序。3.执行完 a= Left(vbscript,2) & Mid(vbscript,3,4) & Right(vbscript,2) 后，a的值为 vbscript 。4.语句 a=DateAdd( d ,10,Date() 将返回10天后是几号。5.语句 b=Int(10 * Rnd或Rndc ) +1) 将返回1到10之间的随机整数。6.在文件开头添加 % Option Explicit% 语句后，则所有的变量都必须先声明才能使用。7.在数据库的表中，纵的一行叫做一个 字段 ，横的一行叫做一个 记录 。8.原来用一个数组users保存学生名单，现

9、在新转来一位同学“张峰”，需要将其名字添加到该数组中，请填写下面程序段中的空格。9.下面是一个函数，用来返回从a到b的立方和，请填写其中的空格。10.下面这段语句，将根据今天是星期几，分别在页面上显示一幅图片，星期一、二显示p1.jpg，其它时间显示p2.jpg。请填写完整下面的程序。%Dim thedatheday= Weekday (Date()Select Case thedayCase 2,3 Response.Write Case Else Response.Write End Select %11.很多网站要求客户必须登录后才能访问，如果客户没有登录，就直接访问网站的某个页面，应该

10、将其引导到首页。请据此填写下面的空格。12.下面的程序段用来计算客户是第几次访问本站。请填写其中的空格。13.假如Application(UserOnLine)中保存了一个数组，该数组中保存了在线用户的名称，下面的程序段从其中读取所有用户名，并显示在页面上，请填写其中的空格。14.对于如下图的数据表link，请填写下面的SQL语句中的空格：图1查询2003年1月1日到2004年1月1日之间的提交的网站，并按提交日期将序排列strSql=Select * From link Where submit_date Between #2003-1-1# And #2004-1-1# Order By

11、submit_date Desc 查询2004年1月1日以后提交的网站总数目strSql=Select Count(*)As Total From link Where submit_date #2004-1-1#15.针对上面图1所示，下面要在页面上按提交日期降序排列所有的网站，请填写下面程序段中的空格。假设数据库文件wwwlink.mdb和本文件存放在同一个文件夹下，数据表名为link。 网站名称网站地址提交日期 a href= target=_blank 16.针对上面图1所示，下面是分页显示所有网站的名称的语句，每页显示10条记录，请填写其中的空格。 % Dim db,rs,strSq

12、l 建立Connection对象 Set db=Server.CreateObject(ADODB.Connection) db.Open Dsn=addr 这里利用数据源连接 建立Recordset对象 Set rs=Server.CreateObject(ADODB.Recordset) strSql =Select * From users order by name Asc rs.Open strSql,db,1 如果记录集不是空的，就执行分页显示 If Not rs.Bof And Not rs.Eof Then 下面一段判断当前显示第几页，如是第一次打开，为1，否则由传回参数决定

13、Dim page_no If Request.QueryString(page_no)= Then page_no=1 Else page_no= CInt (Request.QueryString (page_no) End If 下面一段开始分页显示，指向要显示的页，然后逐条显示当前页的所有记录。 rs. PageSize =10 rs. AbsolutePage =page_no Dim I I=10 Do While And I=I-1 Response.Write rs(name) & rs.MoveNext Loop 下面一段在下方显示页数信息，从1到总页数循环 . Else Re

14、sponse.Write 该记录集为空 End If %17.下面这段程序，打开本文件夹下的文本文件test.txt，并读取其中所有的内容显示在页面上，请填写其中的空格。 % Dim fso Set fso=Server.CreateObject(Scripting.FileSystemObject) Dim TextFile Set TextFile= fso. (Server.MapPath(test.txt) Do While Not TextFile. Response.Write TextFile.ReadLine Response.Write Loop %三、编程题（每空10分，共

15、30分）1请编写代码，在页面上显示如下图形。注意：只要写出主要代码即可*2利用Recodset对象也可以插入记录，现在针对图1所示的数据表，利用插入一条记录：其中网站名称为“搜狐”，网站地址为“”，网站简介为“门户网站”，提交日期为当天。注意：只给出主要代码即可，程序的开头部分已经给出。 % Dim db, strConn strConn=Dbq= & Server.Mappath(address.mdb) & ;Driver=Microsoft Access Driver (*.mdb) Set db=Server.CreateObject(ADODB.Connection)3针对图1，现在

16、有两个文件add_form.asp和add.asp，这两个文件用来向表中添加记录，add_form.asp已经给出，请你完成add.asp。要求：（1）只要完成添加记录的主要代码；（2）网站简介（intro）可以省略，其它字段均不可以省略。Add_form.asp 网站名称 网站地址 网站简介 add.asp（请在下面完成add.asp，开头部分语句和最后一条语句已经给出，只要在中间添加语句即可）% If Request.Form(name) And Request.Form(URL) Then 以下连上数据库，建立一个Connection对象实例db Dim db Set db=Server

17、.CreateObject(ADODB.Connection) db.Open Dbq= & Server.Mappath(wwwlink.mdb) & ;Driver=Microsoft Access Driver (*.mdb);End If%一、选择题（每小题2分，共30分）1小王正在家里通过拨号上网访问搜狐网站，此时谁是服务器端，谁是客户端？(B)(A)小王的机器是服务器端，搜狐网站是客户端 (B) 搜狐网站是服务器端，小王的机器是客户端 (C)小王的机器既是服务器端，又是客户端 （D）以上说法全不对2某同学开发了一个显示来访时间的ASP文件，存放在C:inetpubwwwroot下，

18、请问此时如果在资源管理器中双击该文件，该文件可以正常显示吗？(B)(A) 可以 (B) 不可以3下列哪个变量名称是正确的？(C)(A) 111 (B) _sum (C) ab_1 (D)a?b4执行完如下语句后，a的值为：(C)(A) 10.223344 (B) 10.2 (C) 10.223 (D) 10.0005下列哪个函数可以将数值转换为字符串？(C)(A) Cdate (B)Cint (C) CStr (D) CDbl6 请问Int(3.45)和Int(-3.45)的值分别是什么？(D)(A) 4、-4 (B)3、-4 (C) 3、3 (D) 3、-37 执行完如下语句后，sum的值为

19、?(C)% Dim sum,I Sum=0 I=1 Do While I=10 Sum=sum+I I=I+1 If (I Mod 5=0) then Exit do End ifLoop%(A) 55 (B) 15 (C) 10 (D) 458下列几个是Response对象的方法，哪个是用来输出二进制信息的。(B)(A) BinaryRead (B) BinaryWrite (C) Flush (D) Write9 Aplication对象的默认有效期为多少分钟？(D)(A) 10 (B) 15 (C) 20 (D) 应用程序从启动到结束10问下面程序段执行完毕，页面上显示的内容是什么？(A

20、)(A) 张红 (B)王刚 (C) 王刚张红 (D) 语法有错，无法正常输出11如有一个数据库，其中有表table，包括3个字段name（文本型）、grade（数字型）、birthday（日期/时间型），请问下面哪句能正确执行？ (A)（其中 varName=”林亚” varGrade=98 varBirthday=#1983-1-1#）(A). strSql=Insert Into table(name,grade,intro) Values(& varName & , & varGrade & ,# & varBirthday & #)(B). strSql=Insert Into tab

21、le(name,grade,intro) Values( & varName & , & varGrade & ,# & varBirthday & #)(C). strSql=Insert Into table(name,grade,intro) Values( & varName & , & varGrade & , & varBirthday & )(D).strSql=Insert Into table(name,grade,intro) Values(varName, varGrade,# var Birthday#)12问下面程序段执行完毕，页面上显示内容是什么：(B)%Response.Write Server.HTMLEncode(“新浪”)%(A) 新浪 (B) 新浪(C) 新浪（超链接） (D) 该句有错，无法正常输出13使用事务处理时，假如要回滚事务处理，应该利用如下方法：(D)(A) BeginTrans (B) EndTrans (C) CommitTrans (D) RollBackTrans14设定义了记录集rs, 如果希望打开的记录集可以前后移动指针，并且可读可写，则应该为下面哪一句？(B)(A)rs.Open strSql,db (