28,391
社区成员
发帖
与我相关
我的任务
分享留言不能正常显示的问题!
一个留言板的后台管理中有多条留言信息,其它页都能正常显示,但是有一页不能显示.正常显示的时候是:
留言主题 留言时间 操作 操作
网站测试中 2006-6-14 回复 删除
共[6]页 当前为第[1]页 共检索到[58]条相关信息 1 2 3 4 5 6 >
全选 删除
不正常显示的那一页就只显
留言主题 留言时间 操作 操作
网站测试中 2006-6-14 回复 删除
共多少页等相关信息都不显示,就只有这一页是这样的,请问这是为什么,请各位帮忙解决一下,谢谢了
留言主题 留言时间 操作 操作
网站测试中 2006-6-14 回复 删除
共[6]页 当前为第[1]页 共检索到[58]条相关信息 1 2 3 4 5 6 >
全选 删除
不正常显示的那一页就只显
留言主题 留言时间 操作 操作
网站测试中 2006-6-14 回复 删除
共多少页等相关信息都不显示,就只有这一页是这样的,请问这是为什么,请各位帮忙解决一下,谢谢了
...全文
请发表友善的回复…
发表回复
北京不不 2006-06-15
- 打赏
- 举报
其他的错误没看出。。TurnPage rs,RowCount这个什么意思。。
TurnPage rs,RowCount
TurnPage rs,RowCount
future_914 2006-06-15
- 打赏
- 举报
这是后台显示留言的页面代码,mybase.asp是数据库连接,turnpage.asp是翻页
<!--#include file="../../include/MyBase.asp"-->
<!--#include file="../../include/TurnPage.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留言主题</title>
<!--#include file="../../include/checkForm.js"-->
<script language="JavaScript">
<!--
function CheckAll(frm)
{
for (var i=0;i<frm.elements.length;i++)
{
var e = frm.elements[i];
if (e.name != 'chkall')
{
e.checked = frm.chkall.checked;
}
}
}
function delRows()
{
if (confirm("您真的要删除这些记录吗?"))
{
return true;
}
return false;
}
-->
</script>
</head>
<body>
<form method="POST" action="delGuest.asp" name="frm">
<table border="1" style="border-collapse: collapse; font-size: 10pt" width="100%" cellpadding="5">
<tr>
<td colspan="5"><FONT COLOR="#FF0000">留言列表－－</FONT> </td>
</tr>
<tr>
<td bgcolor="#EBEBEB" width="9%"> </td>
<td bgcolor="#EBEBEB" width="41%">留言主题</td>
<td align="center" bgcolor="#EBEBEB" width="21%">留言人</td>
<td align="center" bgcolor="#EBEBEB" width="19%">留言时间</td>
<td align="center" bgcolor="#EBEBEB" width="10%">回复</td>
</tr>
<%
ConnOpen("../../")
Set rs = Server.CreateObject ("ADODB.Recordset")
sql="select guest_id,guest_title,guest_man,guest_time from guest order by guest_id desc"
rs.open sql,conn,1,3
RowCount = 8 '每页显示的记录条数
TurnPage rs,RowCount
if rs.eof then
%>
<tr>
<td colspan="5"><FONT COLOR="#FF0000">暂无任何留言！</FONT> </td>
</tr>
<%
else
Do while Not rs.eof and RowCount>0
%>
<tr>
<td width="9%"><div align="center">
<input type="checkbox" name="delRow" value="<%=rs("guest_id")%>">
</div></td>
<td width="41%"><%=rs("guest_title")%></td>
<td align="center" width="21%"><%=rs("guest_man")%> </td>
<td align="center" width="19%"><%=rs("guest_time")%> </td>
<td align="center" width="10%"><A HREF="editGuest.asp?gId=<%=rs("guest_id")%>">回复</A></td>
</tr>
<%
RowCount = RowCount - 1
rs.MoveNext
Loop
End If
rs.close
conn.close
%>
<tr>
<td colspan="5" bgcolor="#EBEBEB">共[<font color="#FF0000"><B><%=PageCount()%></B></font>]页 当前为第[<font color="#FF0000"><B><%=PageCurrent()%></B></font>]页 共检索到[<font color="#FF0000"><B><%=RowsCount()%></B></font>]条相关信息
<%=ActionNum("?")%> </td>
</tr>
<tr>
<td><div align="center">
<input type="checkbox" name="chkall" value="on" onclick="CheckAll(this.form)">
</div></td>
<td>全选</td>
<td colspan="3"><input type="submit" value=" 删除 " name="B1" onClick="return delRows()"></td>
</tr>
</table>
</form>
</body>
</html>
<!--#include file="../../include/MyBase.asp"-->
<!--#include file="../../include/TurnPage.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留言主题</title>
<!--#include file="../../include/checkForm.js"-->
<script language="JavaScript">
<!--
function CheckAll(frm)
{
for (var i=0;i<frm.elements.length;i++)
{
var e = frm.elements[i];
if (e.name != 'chkall')
{
e.checked = frm.chkall.checked;
}
}
}
function delRows()
{
if (confirm("您真的要删除这些记录吗?"))
{
return true;
}
return false;
}
-->
</script>
</head>
<body>
<form method="POST" action="delGuest.asp" name="frm">
<table border="1" style="border-collapse: collapse; font-size: 10pt" width="100%" cellpadding="5">
<tr>
<td colspan="5"><FONT COLOR="#FF0000">留言列表－－</FONT> </td>
</tr>
<tr>
<td bgcolor="#EBEBEB" width="9%"> </td>
<td bgcolor="#EBEBEB" width="41%">留言主题</td>
<td align="center" bgcolor="#EBEBEB" width="21%">留言人</td>
<td align="center" bgcolor="#EBEBEB" width="19%">留言时间</td>
<td align="center" bgcolor="#EBEBEB" width="10%">回复</td>
</tr>
<%
ConnOpen("../../")
Set rs = Server.CreateObject ("ADODB.Recordset")
sql="select guest_id,guest_title,guest_man,guest_time from guest order by guest_id desc"
rs.open sql,conn,1,3
RowCount = 8 '每页显示的记录条数
TurnPage rs,RowCount
if rs.eof then
%>
<tr>
<td colspan="5"><FONT COLOR="#FF0000">暂无任何留言！</FONT> </td>
</tr>
<%
else
Do while Not rs.eof and RowCount>0
%>
<tr>
<td width="9%"><div align="center">
<input type="checkbox" name="delRow" value="<%=rs("guest_id")%>">
</div></td>
<td width="41%"><%=rs("guest_title")%></td>
<td align="center" width="21%"><%=rs("guest_man")%> </td>
<td align="center" width="19%"><%=rs("guest_time")%> </td>
<td align="center" width="10%"><A HREF="editGuest.asp?gId=<%=rs("guest_id")%>">回复</A></td>
</tr>
<%
RowCount = RowCount - 1
rs.MoveNext
Loop
End If
rs.close
conn.close
%>
<tr>
<td colspan="5" bgcolor="#EBEBEB">共[<font color="#FF0000"><B><%=PageCount()%></B></font>]页 当前为第[<font color="#FF0000"><B><%=PageCurrent()%></B></font>]页 共检索到[<font color="#FF0000"><B><%=RowsCount()%></B></font>]条相关信息
<%=ActionNum("?")%> </td>
</tr>
<tr>
<td><div align="center">
<input type="checkbox" name="chkall" value="on" onclick="CheckAll(this.form)">
</div></td>
<td>全选</td>
<td colspan="3"><input type="submit" value=" 删除 " name="B1" onClick="return delRows()"></td>
</tr>
</table>
</form>
</body>
</html>
TaoTaoYou 2006-06-14
- 打赏
- 举报
把源码贴出来瞧瞧
