2015年计算机等级考试二级《web程序设计》试题

1、 % Response.Buffer True % % Dim varNumber ’定义一个访问次数变量 varNumber Request.Cookies "Number" ’读取Cookies值 if varNumber "" then varNumber 1??? ’如果是第一次，则令访问次数为1 Else varNumber varNumber+1 ’如果不是第一次，则令访问次数加1 End If Response.Write "您是第" & varNumber & "次访问本站" Response.Cookies "Number" varNumber ’将新的访问次数存到Cookies中 Response.Cookies "Number" .Expires #2030-1-1#??? ’设置有效期 % 2、

dim n， s， number s 1 number prompt "请输入一个数" n number if n 1 then for i 1 to n s s*i next document.write"计算结果为：" for i 1 to n-1 document.write i & "*" next document.write n & " " document.write s else document.write"输入有误" end if

下面这段程序，打开本文件夹下的文本文件test.txt，并读取其中所有的内容显示在页面上，请填写其中的空格。 % Dim?fso Set?fso _____________________________?‘创建FSO组件实例 Dim?TextFile Set?TextFile ?fso.__________? Server.MapPath "test.txt" ?‘打开文本文件 Do?While?Not?TextFile. Response.Write?TextFile.___________‘读一行文本 Response.Write?"" Loop % 答： Server.CreateObject "Scripting.FileSystemObject" OpenTextFile ReadLine AtEndOfStream 23、有一个名wwwlink.mdb数据库，库中有一个link表，字段如图，现在有两个文件add_form.asp和 add.asp，这两个文件用来向表中添加记录，add_form.asp已经给出，请你完成add.asp。要求：(1)只要完成添加记录的主要代码；(2)网站简介(intro)可以省略，其它字段均不可以省略。 Add_form.asp文件代码： 网站名称

网站地址

网站简介 add.asp(请在下面完成add.asp，开头部分语句和最后一条语句已经给出，只要在中间添加语句即可) %?Option?Explicit?% % If?Request.Form "name" ""?And?Request.Form "URL" ""?Then ’以下连上数据库，建立一个Connection对象实例db Dim?db Set?db Server.CreateObject "ADODB.Connection" db.Open?"Dbq "?&?Server.Mappath "wwwlink.mdb" ?&?";Driver Microsoft?Access?Driver? *.mdb ;" End?If % 答： % ’建立Recordset对象 Set?rs Server.CreateObject "ADODB.Recordset" strSql? "Select?*?From?link" rs.Open?strSql，db，0，2 ’添加记录 rs.AddNew rs "name" ?"搜狐" rs "url" "" rs "intro" "门户网站" rs "submit_date" Date rs.Update %