[求助]菜鸟请教"实现简单翻页"的问题
我的源代码如下:
<td height="36" align="center">
<%
set rs1=server.CreateObject("Adodb.recordset")
sql1="select ID from aaa where id="&request("id")+1
rs1.open sql1,conn,1,1
if not rs1.bof then
Response.Write("<a href=img.asp?id="&request("id")+1&">上一张图片</a> ")
end if
rs1.close
sql1="select id from aaa where id="&request("id")-1
rs1.open sql1,conn,1,3
if not rs1.bof then
Response.Write("<a href=img.asp?id="&request("id")-1&">下一张图片</a>")
end if
rs1.close
set rs1=nothing
%>
</td>
可问题是这样要求关键字 ID 是连着的,不然如果中间间断的就出错.
我后来考虑的思路是先设置id的最大值和最小值,然后比如 下一张图片 就id-1 如果id-1没有内容就继续-1,不过要求最后的值不能大于最小值,以防一直往下找. 上一张图片 也是类似思路. 但我自己写的一直有错误
肯定高手帮我把程序写的完整写,举手之劳,,,多谢多谢啊!
