我用下面的asp代码，在网页上无法显示数据库内容 50
我用下面的asp代码，在网页上无法显示数据库内容具体代码如下：<html><head><metahttp-equiv="Content-Type"content="tex...
我用下面的asp代码，在网页上无法显示数据库内容具体代码如下：
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>数据库的连接、增删改查</title>
</head>
<body>
<%
db="Database.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};pwd=admin;dbq=" & Server.MapPath(db)
response.write "数据库连接成功！"
Set rs = Server.CreateObject( "ADODB.Recordset" )
sql = "select * from test;"
rs.open sql,conn,1,3
%>
<br/>
表test的内容:
<table border="1">
<tr>
<td>id</td>
<td>username</td>
<td>password</td>
</tr>
<%
if (rs.bof and rs.eof) then
response.write "nodata!"
else
do while not rs.eof
%>
<tr>
<td><%=rs("id")%></td>
<td><%=rs("username")%></td>
<td><%=rs("password")%></td>
</tr>
<%
rs.movenext
loop
end if
%>
</table>
<%
'conn.execute "update test set username='2' where username='a';"
conn.execute "insert into test(username,password) values ('3','a');"
%>
---------插入数据之后--------<br/>
表test的内容:<br/>
<%
Set rs = Server.CreateObject( "ADODB.Recordset" )
sql = "select * from test;"
rs.open sql,conn,1,3
%>
<table border="1">
<tr>
<td>id</td>
<td>username</td>
<td>password</td>
</tr>
<%
if (rs.bof and rs.eof) then
response.write "nodata!"
else
do while not rs.eof
%>
<tr>
<td><%=rs("id")%></td>
<td><%=rs("username")%></td>
<td><%=rs("password")%></td>
</tr>
<%
rs.movenext
loop
end if
%>
</table>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html> 展开
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>数据库的连接、增删改查</title>
</head>
<body>
<%
db="Database.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};pwd=admin;dbq=" & Server.MapPath(db)
response.write "数据库连接成功！"
Set rs = Server.CreateObject( "ADODB.Recordset" )
sql = "select * from test;"
rs.open sql,conn,1,3
%>
<br/>
表test的内容:
<table border="1">
<tr>
<td>id</td>
<td>username</td>
<td>password</td>
</tr>
<%
if (rs.bof and rs.eof) then
response.write "nodata!"
else
do while not rs.eof
%>
<tr>
<td><%=rs("id")%></td>
<td><%=rs("username")%></td>
<td><%=rs("password")%></td>
</tr>
<%
rs.movenext
loop
end if
%>
</table>
<%
'conn.execute "update test set username='2' where username='a';"
conn.execute "insert into test(username,password) values ('3','a');"
%>
---------插入数据之后--------<br/>
表test的内容:<br/>
<%
Set rs = Server.CreateObject( "ADODB.Recordset" )
sql = "select * from test;"
rs.open sql,conn,1,3
%>
<table border="1">
<tr>
<td>id</td>
<td>username</td>
<td>password</td>
</tr>
<%
if (rs.bof and rs.eof) then
response.write "nodata!"
else
do while not rs.eof
%>
<tr>
<td><%=rs("id")%></td>
<td><%=rs("username")%></td>
<td><%=rs("password")%></td>
</tr>
<%
rs.movenext
loop
end if
%>
</table>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html> 展开
1个回答
展开全部
sql = "select * from test;" 去掉分号
然后，确定数据库链接成功，可以断点输出来判断，确定有数据，可以在插入数据那里判断。
大致看了一下，没有其它错误了。
还有，在同一个地方定义RS的时候，建议用不同的变量名，比如RS2，
然后，确定数据库链接成功，可以断点输出来判断，确定有数据，可以在插入数据那里判断。
大致看了一下，没有其它错误了。
还有，在同一个地方定义RS的时候，建议用不同的变量名，比如RS2，
更多追问追答
追问
还是无法显示内容
追答
那你确定有数据吗？
我复制你的代码测试一下。
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
