我的留言本只能显示4条记录，请教，请教

vagrant_zy 2002-02-22 06:04:59

我做了一个简单的留言本
在本地机上测试，挺正常的
但是发布到网上之后查看留言只能显示4条
就是一页显示满后它不出现滚动条，但是在本地机上会出现
请教各位高手了
部分代码如下：
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE>留言本</TITLE>
</HEAD>
<BODY><p align=center><font size=+5>留言本</font></p>
<%
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("message.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="select * from mytable"
rs.open sql,conn,1,1
if rs.EOF or rs.BOF then
Response.Write "当前没有留言！"
Else
%>
<table>
<%
do while not rs.EOF or rs.BOF
%>
<tr>
<td>
<br>网友 <%=rs("user")%>于 <%=rs("addtime")%>给 <%=rs("towho")%>留言
</td>
</TR>
<tr>
<td> <%=rs("content")%></td>
</tr><%
rs.movenext
loop
%></table><%
end if
set rs=nothing
set conn=nothing
%>
</BODY>
</HTML>

...全文

57 9 打赏收藏转发到动态举报

写回复

用AI写文章

9 条回复

切换为时间正序

请发表友善的回复…

发表回复

vagrant_zy 2002-02-23

打赏
举报

我发现是display.asp里的数据库路径不对，改过来后就正常了。这个不是保存记录的，但是想不到也有关系哈
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE>留言本</TITLE>
</HEAD>
<BODY><p align=center><font size=+5>留言本</font></p>
<%
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("db/message.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="select * from mytable"
rs.open sql,conn,1,1
if rs.EOF or rs.BOF then
Response.Write "当前没有留言！"
Else
%>
<table>
<%
do while not rs.EOF or rs.BOF
%>
<tr>
<td>
<br>网友 <%=rs("user")%>于 <%=rs("addtime")%>给 <%=rs("towho")%>留言
</td>
</TR>
<tr>
<td> <%=rs("content")%></td>
</tr><%
rs.movenext
loop
%></table><%
end if
set rs=nothing
set conn=nothing
%>
</BODY>
</HTML>

vagrant_zy 2002-02-23