| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 409 人关注过本帖
标题:[求助]分页出现问题
只看楼主 加入收藏
找个好老师
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2006-10-22
收藏
 问题点数:0 回复次数:6 
[求助]分页出现问题

大侠帮忙看看,我分页哪里错了啊。。我现在人都慌了!谢谢了!
<!--#include file="musiclm.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<div align="center">
<%
rs.pagesize=1
pagecount=rs.pagecount
page=int(request("page"))
if page<0 then page=1
if request("page")="" then page=1
rs.absolutepage=page
%>
<%
dim i
gs_id = request.querystring("id")
if gs_id<>"" then
set rs=conn.execute("SELECT * FROM music where gs_id="&gs_id&" order by hits desc")
%>
<table width="70%" height="130" border="1" cellpadding="0" cellspacing="0" bordercolor="#EFEFEF">
<tr>
<td width="18%" height="112"><div align="center"><img name="" src="<%=rs("gs_img")%>" width="122" height="111" alt=""></div></td>
<td width="82%"><div align="center"><%=rs("gs_baby")%></div></td>
</tr>
<tr>
<td height="15" colspan="2"><div align="center">
</div></td>
</tr>
</table>
<%
if not rs.eof then
i=0
for a=1 to rs.pagesize
i=i+1
%>
<table width="70%" border="1" cellpadding="0" cellspacing="0" bordercolor="#EFEFEF">
<tr>
<td><div align="center"><%=rs("musicname")%></div></td>
<td><div align="center"><a href="play.asp?id=<%=rs("id")%>" & <%=rs("map")%> target="_blank">视听</a></div></td>
<td><div align="center"><%=rs("hits")%></div></td>
<td><div align="center"><a href="<%=rs("map")%>"><img src="images/106.gif" width="19" height="20"></a></div></td>
<% if i mod 3 =0 then%>
<%
end if
rs.movenext
if rs.eof then
exit for
end if
next
end if
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</tr>
</table>
</div>
<%for a=1 to pagecount%>
<a href="geshou.asp?<%=rs("id")%> &page=<%=a%>"><%=a%></a>
<%next%>
</body>
</html>

2006-10-26 03:51
fengmumei
Rank: 2
等 级:论坛游民
威 望:2
帖 子:298
专家分:14
注 册:2006-9-16
收藏
得分:0 
你是要问问题还是让别人给你看代码?

有什么问题直接说好不好?

提示什么错误总该说一下吧?

随缘不变,不变随缘
2006-10-26 13:36
找个好老师
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2006-10-22
收藏
得分:0 
错误提示的是没有找到匹配的rs

不断努力,才能不断的提高,学无止尽!
2006-10-26 16:50
找个好老师
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2006-10-22
收藏
得分:0 
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp,行242

Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e21'

ODBC 驱动程序不支持所需的属性。

/yunding/geshou.asp,行7

不断努力,才能不断的提高,学无止尽!
2006-10-26 17:16
找个好老师
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2006-10-22
收藏
得分:0 
代码是这样的
<!--#include file="musiclm.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<div align="center">
<%
exec="select * form music"
set rs=server.CreateObject("adodb.recordset")
rs.open exec,conn,1,1
%>
<%
rs.pagesize=1
pagecount=rs.pagecount
page=int(request("page"))
if page<=0 then page=1
if request("page")="" then page=1
rs.absolutepage=page
%>
<%
dim i
gs_id = request.querystring("id")
if gs_id<>"" then
set rs=conn.execute("SELECT * FROM music where gs_id="&gs_id&" order by hits desc")
%>
<%if rs.eof and rs.bof then
response.Write("暂时没有歌曲")
else
%>
<table width="50%" height="130" border="1" cellpadding="0" cellspacing="0" bordercolor="#EFEFEF">
<tr>
<td width="18%" height="112"><div align="center"><img name="" src="<%=rs("gs_img")%>" width="122" height="111" alt=""></div></td>
<td width="82%"><div align="center"><%=rs("gs_baby")%></div></td>
</tr>
<tr>
<td height="15" colspan="2"><div align="center">
</div></td>
</tr>
</table>
<%
if not rs.eof then
i=0
for i=1 to pagesize
i=i+1
%>
<table width="50%" border="1" cellpadding="0" cellspacing="0" bordercolor="#EFEFEF">
<tr>
<td width="40%"><div align="center"><%=rs("musicname")%></div></td>
<td width="22%"><div align="center"><a href="play.asp?id=<%=rs("id")%>" & <%=rs("map")%> target="_blank">试听</a></div></td>
<td width="20%"><div align="center"><%=rs("hits")%></div></td>
<td width="18%"><div align="center"><a href="<%=rs("map")%>"><img src="images/106.gif" width="19" height="20"></a></div></td>
<% if i mod 3 =0 then%>
<%
end if
rs.movenext
next
end if
end if
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</tr>
</table>
</div>
<%for i=1 to pagecount%>
<a href="geshou.asp?id=<%=rs("id")%> & page=<%=i%>"><%=i%></a>
<%next%>
</body>
</html>
<!--#include file="dibu.asp" -->

不断努力,才能不断的提高,学无止尽!
2006-10-26 17:16
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
不同的操作最好由不同的RecordSet对象来完成,一个RecordSet开了关,关了再开。很容易出问题。
2006-10-26 21:59
找个好老师
Rank: 1
等 级:新手上路
帖 子:21
专家分:0
注 册:2006-10-22
收藏
得分:0 
那能告诉我用什么方法做出来吗?

不断努力,才能不断的提高,学无止尽!
2006-10-26 22:15
快速回复:[求助]分页出现问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.027682 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved