2014年计算机等级考试二级《web程序设计》试题(2)

2014 年 7 月 9 日4610

下面这段程序,打开本文件夹下的文本文件test.txt,并读取其中所有的内容显示在页面上,请填写其中的空格。

  <%

  Dimfso

  Setfso=_____________________________‘创建FSO组件实例

  DimTextFile

  SetTextFile=fso.__________(Server.MapPath("test.txt")‘打开文本文件

  DoWhileNotTextFile.

  Response.WriteTextFile.___________‘读一行文本

  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,开头部分语句和最后一条语句已经给出,只要在中间添加语句即可)

  <%OptionExplicit%>

  <%

  IfRequest.Form("name")<>""AndRequest.Form("URL")<>""Then

  ’以下连上数据库,建立一个Connection对象实例db

  Dimdb

  Setdb=Server.CreateObject("ADODB.Connection")

  db.Open"Dbq="&Server.Mappath("wwwlink.mdb")&";Driver={MicrosoftAccessDriver(*.mdb)};"

  EndIf

  %>

  答:

  <%

  ’建立Recordset对象

  Setrs=Server.CreateObject("ADODB.Recordset")

  strSql="Select*Fromlink"

  rs.OpenstrSql,db,0,2

  ’添加记录

  rs.AddNew

  rs("name")="搜狐"

  rs("url")="http://www.zjjv.com/"

  rs("intro")="门户网站"

  rs("submit_date")=Date()

  rs.Update

  %>

  相关推荐:

  2014年计算机等考上机六大注意事项

  2014年计算机二级WEB程序复习重点汇总

  2014年计算机二级WEB模拟试题及答案汇总

0 0