我是新手 帮忙
conn.asp
<%
dim conn
set conn=server.createobject(adodb.connection)
strconnect="microsoft access briver(*.mdb)};dbq=e:/inetput/wwwroot/qubu/tushu.mdb"
conn.open strconnect
%>
index.asp
<!--#include file="conn.asp"-->
<html>
<head>
<title>
数目列表
</title>
</head>
<body>
<%
dim rs,sql
dim rsid,rssm,rsjg,rszz,rscb
set rs=server.createobject(adodb.recordset)
sql="select * form tushu"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write <script>alert('暂时没有记录!少后查询!');history.back();</script>"
response.end
else
rsid=rs("id")
rssm=rs("sm")
rsjg=rs("jg")
rszz=rs("zz")
rscb=rs("cb")
%>
<table>
<tr>
<td>编号</td>
<td>书名</td>
<td>价格</td>
<td>作者</td>
<td>出版</td>
</tr>
<%
for i=1 to rs.count
%>
<tr>
<td><%=rsid%></td>
<td><%=rssm%></td>
<td><%=rsjg%></td>
<td><%=rszz%></td>
<td><%=rscb%></td>
</tr>
<%
next
%>
</table>
</body>
</html>
帮我看看这个怎么写
