急寻asp的一简单效果代码

来源：百度知道 编辑：UC知道 时间：2024/06/08 06:09:21
就是像QQ空间中看日志时可以“上一篇”，“下一篇”的效果的代码，而且如果已经是第一篇日志了，再继续“上一篇”的话，就提示本篇已是第一篇日志。 我现在用的是id递增做的，可是这样有缺陷。
啊，问题终于解决了。谢谢 oscar8521 最开始我的一个同学给我说的方法就是你这种，觉得麻烦没有用，可是找了别的方法又出错了，没办法。呵呵，不过 happyfish2003 我觉得你这种方法真的很有创意，只是，你的那个记录集里查询出来只有一条记录，怎么能movenext呢？我新建了第二个记录集尝试着用了，可是最终还是没有成功，或许你可以把这种方法说的更详细点，那就好了，真的谢谢。分不多，还望大家包涵。

这是我以前写的,不知道对你有没有用?

<% set srs=server.createobject("adodb.recordset")
dim n
n=0
sql="SELECT top 1 * FROM news WHERE news_type="&request("type")+" and news_id<"&info_id
if srs.bof and srs.eof then
response.Write " <strong>上一篇:到顶篇了</strong>"
else %>
<table width="100%" border="0" cellpadding="0" cellspacing="2" bgcolor="#FFFFFF">
<tr>
<td><strong>上一篇：<a href="shownews.asp?id=<%=srs("news_ID")%>&type=<%=srs("news_type")%>"><%=srs("news_title")%></a></strong> [<%=formatdatetime(srs("news_Addtime"),2)%>]</td>
</tr>
<