问答题
阅读下列说明,根据网页显示的效果图,回答问题1至问题7。
【说明】以下是用ASP实现了一个网络收藏夹网页,用于保存用户感兴趣的Web网页地址。用IE打开网页文件“index.asp”后的效果如图5-1所示。程序中使用的Access数据表结构如表5-1所示。
表5-1 address数据表结构
字 段 名 | 类 型 | 备 注 | | 字 段 名 | 类 型 | 备 注 |
no | 自动编号 | 序号 | | url | 文本 | 超链接 |
name | 文本 | 主页名称 | | category | 文本 | 网站类别 |
【index.asp文档的内容】
<%@LANGUAGE="VBSCRIPT" %>
<%
set conn=server.
(5) ("Adodb.Connection")
provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
path="Data Source=" & Server.MapPath("main.mdb"
connstr= provider & path
corm.open connstr
%>
<html>
<head><title>网络收藏夹</title></head>
(6) <center>
<%
set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from address"
rs.open() sql,corm, 1,3
if Request("name") = "" or Request("url")="" then
Response.write ("内容填写不完整")
else
rs.addnew
rs(1) =request ("name")
rs(2) =request ("URL")
rs(3) =request ("category")
rs.update
end If
%>
<table width="500" border="1" cellpadding="0" cellspacing="0" bordercolor="#FFCC00">
<tr><td>序号</td><td>名称</td><td>类别</td></tr>
<% rs.movefirst
for j=1 to rs.
(7) %>
<tr>
<td><%=j%></td>
<td><a href="<%=rs("url")%>" target=" blank"><%=
rs("name")%></a></td>
<td><%=rs("category")%></td>
</tr>
<% rs.movenext
(8) %>
</table><br>
<form action="index.asp" method="post" name="new" id="new">
<table width="300" border="1" cellpadding="0" cellspacing="0"
bordercolor="#FFCC00">
<tr>
<rd width=" 61">名称</td>
<td width="223" align="left"><input name="name" type="text"
id="name" ></rd>
</tr>
<tr>
<td>超连接</td>
<rd align="left"><input name="URL" type="text" id="URL"></td>
</tr>
<tr>
<td colspan="2">类别</td>
</tr>
<tr>
<td colspan="2"><textarea name="category" rows="5" id="disc">
</textarea>
<br>*为必填项目</rd>
</tr>
</table>
<br>
(9) </form>
<%
rs.close
conn.close
%>
</center>
</body>
</html>
【问题2】 (2) 是矢量动态工具。