ASP连接数据库代码出问题了，高手帮改下

来源：百度知道 编辑：UC知道 时间：2024/05/14 18:22:58
<%
Dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("tushu.mdb")
Set bb=Server.CreateObject("adodb.Connection")
bb.Open connstr
%>

<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>查询表单</title>
</head>

<body>
<% set rs = server.CreateObject ("adodb.recordset")
rs.open "select * from tushumingxi ",bb
%>

<% =rs("mc")%>
<% =rs("jg")%>
<% =rs("zz")%>
</body>

</html>
这是全部代码，运行结果是无法显示。郁闷
这是Access的库

tushumingxi 里面有几个记录? 你指定了那条输出

<body>
<% set rs = server.CreateObject ("adodb.recordset")
sqlselect * from tushumingxi
rs.sql,3,3
%>

<% =rs("mc")%>
<% =rs("jg")%>
<% =rs("zz")%>
</body>
加个循环输出把

rs.open "select * from tushumingxi ",bb 后加上do while not rs.eof
</body> 钱加上rs.movenext loop

set rs = server.CreateObject("adodb.recordset")
rs.open "select * from tushumingxi",bb,1,1
do while not rs.eof
<% =rs("mc")%>
<% =rs("jg")%>
<% =rs("zz")%>
rs.movenext
loop

<% =rs("mc")%>
前面加个判断
是否EOF
如果不是EOF则继续
否则response.write "数据为空"
set rs = server.CreateObject("adodb.recordset")
rs.open "select * from tushumingxi",bb,1,1

do