图片调用代码 首页排序不正常 求助 看看代码有问题没有啊
asp吧
全部回复
仅看楼主
level 1
<table style="margin:0px auto" width="1000" height="344" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#F1F1F1">
<tr>
<td height="344" colspan="12" align="center" valign="middle">
<%
set rs=server.createobject("adodb.recordset")
exec="select top 9 * from Info where tj=*1* order by rq desc "
rs.open exec,conn,1,1
if rs.eof then
response.Write " 暂无产品!"
else
rs.PageSize =12 *每页记录条数
iCount=rs.RecordCount *记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
%>
<%For i=1 To x%>
<div style="float:left;padding-left:19px;">
<table width="308" border="0" cellpadding="0" cellspacing="10" bgcolor="#FFFFFF">
<tr>
<td height="127"><div align="center"><a href="view.asp?id=<%=rs("id")%>" title="<%=rs("title")%>"
class="img"><img src="<%=rs("pic")%>" width="280" height="150" align="middle" /></a></div></td>
</tr>
<tr>
<td height="33" align="left"><a href="view.asp?id=<%=rs("id")%> " title="<%
=rs("title")%>" class="STYLE1"><%=left(rs("title"),20)%></a></td>
</tr>
<tr>
<td height="85" align="left" valign="top"><%=left(rs("content"),80)&"..."%></td>
</tr>
</table>
</div>
<%rs.movenext
next
%>
<%
end if
%></td>
</tr>
</table>
2014年09月05日 04点09分 1
level 3
你排版是用什么的?如果我没看错的话是层里面嵌套表格是吧!是不是层的位置乱动?
2014年09月08日 07点09分 2
<tr> <td height="85" align="left" valign="top"><%=left(rs("content"),80)&"..."%></td> </tr> 删除一行 图片就正常了
2014年09月09日 08点09分
level 13
你这样确定能分页?
2014年09月09日 00点09分 3
不行啊 分页有问题啊 将就用了
2014年09月09日 08点09分
回复 首信2768756387 :必须有问题,根本就没理解分页的设计概念
2014年09月10日 02点09分
回复 飞龙的守护8382 :怎么解决啊 谢谢
2014年09月10日 02点09分
level 1
rs.PageSize =9 *每页记录条数
iCount=rs.RecordCount *记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="9" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
%>
根本实现不了分页啊
2014年09月10日 02点09分 4
level 13
根本就是错的
2014年09月10日 12点09分 5
level 12
分不了页,问题不在这里
在于你的 select top 9
你现在这种分页方式,是不能 select top 的 ,直接 select 就可以
2014年09月10日 16点09分 6
level 12
而且 你这个写法上 有些别扭,不过不是什么根本问题
只是跟一般的算法不一样
rs.open sql,conn,cursor,lock
值得一提的是,有些数据库是不提供游标的,例如 access 所以 要使用本地游标,才可以。
2014年09月10日 16点09分 7
1