[求助]为什么rsObj.recordCount和rsObj.pageCount读出来是-1 - ASP

秋燕子_児

电梯直达

1^#

发表于 2010-1-7 03:46:31 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

<%
dim connstr '连接字符串
dim db '数据库文件路径
db = "../database/golfers.mdb"
connstr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr
set rsObj = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM news WHERE 1 = 1"
strSQL = strSQL&" ORDER by newsid desc"
rsObj.Open strSQL, conn, 2,1
rsObj.pagesize = conMaxPerPage
%>
<%=rsObj.recordCount%><br><%=rsObj.pageCount%>
数据库里是有数据的

收藏0

使用道具举报

苍穹

2^#

发表于 2010-1-7 03:46:34 | 只看该作者

好象是什么东西不支持我也忘. 给你看下我的代码

回复支持反对

使用道具举报

jane

3^#

发表于 2010-1-7 03:46:37 | 只看该作者

// 需要此文件

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="text.css" rel="stylesheet" type="text/css">
</head>
<body>
<div align="center">
<%
rs.cursortype=3
str="select * from gqgx Order By id desc"
rs.open str,conn,3,1
%> <table width="80%" height="550" border="1" bordercolor="aa0000">
<tr>
<td height="510" align="center" valign="top"><form name="form1" method="post" action="">
<table width="100%" border="0">
<tr bgcolor="bb0000">
<td width="33%" height="20"><div align="center" class="style6">标题</div></td>
<td width="33%" height="20"><div align="center" class="style6">关系</div></td>
<td width="33%" height="20"><div align="center" class="style6">操作</div></td>
</tr>
<% if rs.eof or rs.bof then
response.write "<td>没有信息记录</td>"
else %>
<% rs.pagesize=15 %>
<% if request("page")="" then
page=1
else
page=CLng(request("page"))
end if
%>
<%
IF page<1 Then
page=1
end if
If page>rs.pagecount Then
page=rs.pagecount
rs.absolutepage=page
end if
%>
<%
rs.absolutepage=cint(page)%>
<% for ipage=1 to rs.pagesize %>
<%
id=rs("id")
title=rs("title")
types=rs("gqgx")
Notice=rs("Notice")
response.Write("<tr bgcolor=#CCCCCC>")
response.Write("<td height=20><div align=center>"&title&"</div></td>")
response.Write("<td height=20><div align=center>"&types&"</div></td>")
if Notice=true then
response.Write("<td height=20><div align=center><A href=xggqgx.asp?id="&id&"><font color=000000>修改</font></a> | <a href=# onClick=""javascript:if(confirm('确定要删除吗？')) location.href='dele.asp?cz=5&id="&id&"';""><font color=000000>删除</font></a> | <a href=laws.asp?cz=5&czz=1&id="&id&"><font color=000000>取消公告</font></a></div></td>")
else
response.Write("<td height=20><div align=center><A href=xggqgx.asp?id="&id&"><font color=000000>修改</font></a> | <a href=# onClick=""javascript:if(confirm('确定要删除吗？')) location.href='dele.asp?cz=5&id="&id&"';""><font color=000000>删除</font></a> | <a href=laws.asp?cz=5&czz=2&id="&id&"><font color=ff0000>设为公告</font></a></div></td>")
end if
response.Write("</tr>")
%>
<% rs.moveNEXT
IF rs.EOF Then
Exit For
End If
next
end if
%>
</table>
</form></td>
</tr>
<tr>
<td height="20"><div align="center"><table width="330" border="0" align="center" bgcolor="#FFFFFF">
<tr>
<%
'翻页控制代码
IF page<>1 Then
Response.Write("<td><a href=glgqgx.asp?page=1><font color=000000>第一页</font></a></td>")
Response.Write("<td><a href=glgqgx.asp?page="&(page-1)&"><font color=000000>上一页</font></a></td>")
Else
Response.Write("<td>第一页</td>")
Response.Write("<td>上一页</td>")
End IF
IF page<>rs.pagecount then
Response.Write("<td><a href=glgqgx.asp?page=" & (page+1) & "><font color=000000>下一页</font></a></td>")
Response.Write("<td><a href=glgqgx.asp?page=" & rs.pagecount & "><font color=000000>最后一页</font></a></td>")
Else
Response.Write("<td>下一页</td>")
Response.Write("<td>最后一页</td>")
End IF
%>
<td><span class=style22>共<%=rs.pagecount%>页</span></td>
<td align="left"><span class=style22>当前第<%=page%>页</span></td>
</tr>
</table></div></td>
</tr>
</table>
</div>
</body>
</html>

回复支持反对

使用道具举报

※为你歌唱※

4^#

发表于 2010-1-7 03:46:40 | 只看该作者

哦,谢谢

回复支持反对

使用道具举报

天泪离星

5^#

发表于 2010-1-7 03:46:43 | 只看该作者

我把文件传上来了,各位帮忙看看.
就是数据库news表中有11个数据.但是pageguide.asp中的
<div align = "right"><%=rsObj.recordCount%>项，第<%=page%>/<%=rsObj.pageCount%> 页　
语句中的rsObj.recordCount和rsObj.pageCount显示为-1. 附件: 只有本站会员才能下载或查看附件，请您登录或注册

回复支持反对

使用道具举报

		自动登录	找回密码
密码			注册