access查询表格的上一条和下一条记录的SQL命令

Answer 1

上一篇：
<%
sql="select top 1 id,title from news where id>"&rs("id")&" order by idate desc,id asc"
set rsx=server.CreateObject("adodb.recordset")
rsx.open sql,conn,1,1
if rsx.recordcount=0 then
response.Write("没有了")
else
response.Write("<a href=news_detail.asp?id="&rsx("id")&" target=_blank >"&rsx(1)&"</a>")
end if
rsx.close
set rsx=nothing
%>
  
下一篇：
<%
sql="select top 1 id,title from news where id<"&rs("id")&" order by id desc"
set rsx=server.CreateObject("adodb.recordset")
rsx.open sql,conn,1,1
if rsx.recordcount=0 then
response.Write("没有了")
else
response.Write("<a href=news_detail.asp?id="&rsx("id")&" target=_blank>"&rsx(1)&"</a>")
end if
rsx.close
set rsx=nothing
%>