题库 题库

【简答题】

试题五(15分)
  阅读下列说明,根据网页显示的效果图,补充ASP程序中___(n)___处空缺的代码,解释程序中用下划线标出的语句的含义,将解答填入答题纸对应的解答栏内。
【说明】
  某在线娱乐公司用ASP实现了一个用于在线点播电影的网页,主页文件名为“index.asp”,网页运行的效果如图5-1所示。程序中使用的Access数据表结构如表5-1和表5-2所示。
    
【conn.asp 文档的内容】
 <%
 dimdb,conn,connstr
 db="film.mdb"
 set C_dj=server.CreateObject("ADODB.connection")
 c_dj="proyider=microsoft.jet.oledb.4.0;data source="&server.MapPath("data/"&db&"")
 conn.Openconnstr    <!--第(1)处--> (2分)
 %>
【index.asp文档的内容】
 ___(2)___       <!--第(2)处--> (1分)
 <html>
 <head>
 <title>在线电影</title>
 <style type="text/css">
 <!—-
 td     {font-size:12px;line-height:17px}
 body    {font-size:12px;line-height:17px}
 p      {margin-top:1px;margin-bottom:1pX}
 a:link   {text-decoration:none;color:black}
 a:visited  {text-decoration:none;color:black}
 a:active  {text-decoration:none;color:blue}  <!--第(3)处-->(2分)
 -->
 </style>
 </head>
 <body leftmargin="0" topmargin ="0">
 <!--#include file="head.asp"-->
 <div align="center">         <!--第(4)处--> (2分)
 <table>
  <td height="30" width="367">
   <%sql="select * from item"
    setrs_item=server,createobjiect("adodb.recordset")
    rs_iterm.open sql,connstr,1,1
    response.write"<p><b><img src=images/dot1.gif><a href=index.asp>全部电影</a>&nbsp;"
    do while not rs_item.eof
     response.write "<imgstc--images/dotl.gif botder=O><a href=index.asp?item="
&rs_item("name")&">"&rs_itern("name")A"</a>&nbsp;"
     ___(5)___   <!--第(5)处--> (1分)
    loop      <!--第(6)处--> (2分)
    response.write "</b>&nbsp;"
    rs hm.close%>
  </td>
 </table>
 </div>

 <div align="center">
 <% dim item_type
  item_type= ___(7)___    <!--第(7)处--> (1分)
  if item_type="" or itcrn_type =“全部电影” then
   sql="sclect * from data"
  else
   sql="___(8)___"      <!--第(8)处--> (1分)
  end if
  set rs=server, createobject("adodb.recordset")
  rs.open sql,connslr,1,1
 %>
 <table
  <tr>
   <td width="125" background="images/bg.gif" height="30">&nbsp;
   <img border="O" src="images/biao_lefi.gif" width=" 15" height=" 15">影片名字</td>
   <td width="115' background="images/bg.gif" heighr="30" align='center''>在线播放</td>
   <td width="64" background--"images/bg.gif" height="30" align="center">电影类型</td>
   <td width="58" background="images/bg.gif" height="30" align="center">播放格式</td>
   <td width="43" background-"images/bg, gif" heighr="30" align--"center">点击</td>
   <td width="70" background="images/bg.gif" height="30" align="center">加入日期</td>
   <td width="73" background="images/bg, gif" height="30" align="center">推荐度</td>
  </tr>
 <%do while not rs.eot%>
  <tr>
   <td width="125" height"30" >&nbsp;<img border="O" src="images/dian.gif">&nbsp;
   <%=rs( "name" )%></rd>
    <td width=" 115" height="30" align="center"><a href="">点播</td>
    <td width="64" heigh-t="30" align ="center"><a href="index.asp?item=<%=rs("item")%>">
   <%=rs("item")%></td>
    <td width="58'' height="30" align="center"><%=rs("type")%></td>
    ___(9)___       <!--第(9)处--> (1分)
    <td width--"70" height="30" align="center"><%=rs("date")%</td>
    <td width="73" height="30" align="center"><font color="red"><%=rs("mark")%></a></td>
  </tr>
 <% rs.movcnext      <!--第(10)处-->   (2分)
  loop%>
 </table>
 </div>
 <!--#include file="foot.asp"-->
 </body>
 </html>

参考答案

 (1) 数据库连接对象conn以connstr中定义的连接字符串打开数据库连接
 (2) <!--#inciude file=″conn.asp″-->
 (3) 当前处于活动状态的标签<a>中的文字显示为蓝色
 (4) <div>标记下的内容居中
 (5) rs_item.movenext
 (6) 转下一次while循环
 (7) Trim(request(″item″))
 (8) select * from data where item=″&item_type&″
 (9) <td width=″43″height=″30″align=″center″><%=rs(″hits″)%></td>
 (10) 数据集对象rs移动到下一条记录

相关试题