上一篇及下一篇的asp实现
来源:互联网 发布:软件系统安全设计方案 编辑:程序博客网 时间:2024/04/28 03:24
在文章系统中,我们在浏览文章的时候总能看到下部一个
上一篇:******
下一篇:******
这样的东西,一直在想怎么实现的,上次也找到了相关代码,一直没有去看,今天一看,那人还真厚道,原版代码给我。汗!最后发现其实就是一句话: sql="select top 1 * from articles where id>"& a1 &" order by id"
其中a1是当前的id,这里的奥妙全在top 1和where id>"& a1 &" 以及order by id了,以前还在考虑删除问题、加减一的手法。埃,思想是多么重要。
下面是两个函数,方便使用,任君选择。哈哈
<%
'定义一个thenext函数来找出下一篇的ID,如果当前记录已经是最前面的一条记录,则输出文字“没有了”
function thenext(a1)
newrs=server.CreateObject("adodb.recordset")
sql="select top 1 * from articles where id>"&a1&" order by id"
set newrs=conn.execute(sql)
if newrs.eof then
response.Write("没有了")
else
a2=newrs("id")
response.Write("<a href='view.asp?id="&a2&"'>下一篇</a>")
end if
end function
'定义一个thehead函数来找出下一篇的ID,如果当前记录已经是最前面的一条记录,则输出文字“没有了”
function thehead(a1)
headrs=server.CreateObject("adodb.recordset")
sql="select top 1 * from articles where id<"&a1&" order by id desc"
set headrs=conn.execute(sql)
if headrs.eof then
response.Write("没有了")
else
a0=headrs("id")
response.Write("<a href='view.asp?id="&a0&"'>上一篇</a>")
end if
end function
%>
- 上一篇及下一篇的asp实现
- asp实现上一篇下一篇
- ASP实现页面的“上一篇、下一篇”功能
- 实现上一篇,下一篇的效果
- ASP.NET 实现上一篇文章 下一篇文章
- asp显示“上一篇下一篇”
- 实现上一篇下一篇文章的方法
- mysql实现文章上一篇下一篇的sql语句
- 上一篇文章、下一篇文章实现
- HQL实现新闻上一篇下一篇
- SQL实现上一篇和下一篇
- php如何实现上一篇下一篇
- 上一篇下一篇
- 关于新闻的上一篇,下一篇
- 显示上一篇下一篇的代码
- 上一篇下一篇的问题
- Asp.NET 中写存储过程执,实现上一篇,下一篇文章功能
- asp.net中的上一篇和下一篇问题
- Windows Mobile应该如何发展?
- 【转载】AS3 Library for Facebook
- 飞鸽传书中listview的应用???
- 李开复:被抄袭不是坏事 百度不是挑战
- 网上视频技术资源
- 上一篇及下一篇的asp实现
- GDI+ for VCL基础 -- 画笔
- 【转载】ADOBE新产品ADOBE CS4 ADOBE BORDEAUX
- jquery选择器的使用
- 用触发器对sqlserver进行数据备份
- Singleton
- mydelphiwithexcel
- 127.0.0.1
- js获取url参数