Question

如何用asp代码实现显示上一条、下一条记录？并显示上下记录的标题，上下记录没有时显示“没有了”！

在做网站是为了方便，不想返回去，那样太麻烦！想在本页面显示上一条下一条，并且将标题显示出来怎么做？

Answer 1

思路：
1.获取当前这条记录的ID
2.上一条实现的方法：SQL查询语句的条件：当前这条记录的ID-1
3.下一条实现的方法：SQL查询语句的条件：当前这条记录的ID+1
当然上一条与下一条还可以完善，比如当前是最前的一条时，就没有上一条了。
SQL查询语句知道了，显示标题就没有什么问题了，直接从数据库读取就可以了。

set rsqp=server.CreateObject("adodb.recordset")
rsqp.open"select top 1 * from news where id < "&newsid&" order by id desc",conn,1,1
if not rsqp.bof and not rsqp.eof then
qptitle=rsqp("title")
qptitleurl=rsqp("htmfilename")
else
pytitle="已经是最前一篇了！"
pytitleurl=htmfilename
end if
rsqp.close
set rsqp=nothing

set rsxp=server.CreateObject("adodb.recordset")
rsxp.open"select top 1 * from news where id > "&newsid&" order by id asc",conn,1,1
if not rsxp.bof and not rsxp.eof then
xptitle=rsxp("title")
xptitleurl=rsxp("htmfilename")
else
xptitle="已经是最后一篇了！"
xptitleurl=htmfilename
end if
rsxp.close
set rsxp=nothing