asp文章上一篇,下一篇实现代码
来源:asp之家 时间:2008-03-24 20:15:00
新闻、文章系统中经常会用到的一个功能,添加上一篇,下一篇或相关文章的功能可以增加访客停留的时间。也许新人在做这上一篇、下一篇功能时使用的是ID+1或ID-1 的sql查询语句,这样做的缺点时当文章自动编号不连续时,就查询不到数据了。正确的方法应该是使用ID>pid或ID<pid,其中pid是当前文章的id。
下面的函数就是使用这个方法:
Rem==上一篇==
Rem================================================================
Rem= 参数说明:
Rem= pid当前ID,prame:栏目前辍(如一般web_news表,字段时一般为wn_**,prame就代表wn)
Rem= ptable(表前辍.如一般表名是:站点名_表名(shenzhe_news) ptable:就代表shenzhe)
Rem= 说明:采用上面命名法,可使该过程达到通用
Rem===============================================================
Function GetPre(pid,prame,ptable)
id = prame&"_id"
title = prame&"_title"
table = "city_"&ptable
url = "show_"&ptable
sql = "SELECT TOP 1 "&id&","&title&" FROM "&table&" WHERE "&id&"<"&pid&" ORDER BY "&id&" DESC"
set rs = Conn.Execute(sql)
If rs.eof or rs.bof Then
pre = "上一篇:没有新闻了"
Else
pre = "<a href="&url&".asp?"&id&"="&rs(0)&">"&rs(1)&"</a>"
End If
GetPre = pre
End Function
Rem = 下一篇
Rem=============
Rem= 参数函意和上过程一样
Rem==========
Function GetNext(nid,nrame,ntable)
id = nrame&"_id"
title = nrame&"_title"
table = "city_"&ntable
url = "show_"&ntable
sql = "SELECT TOP 1 "&id&","&title&" FROM "&table&" WHERE "&id&">"&nid&" ORDER BY "&id&" "
set rs = Conn.Execute(sql)
If rs.eof or rs.bof Then
nnext = "下一篇:没有新闻了"
Else
nnext = "<a href="&url&".asp?"&id&"="&rs(0)&">下一篇:"&rs(1)&"</a>"
End If
GetNext = nnext
End Function
实现代码:
偶数据库里有表:
city_active city_date city_note
city_active主要字段有: ca_id,cd_title
city_date主要字段有: cd_id,cd_title
city_note主要字段有: cn_id, cn_title
这样引用就可:
在show_new.asp?cn_id=4里引用上一篇下一篇
<%=GetPre(cn_id,"cn","note")%> ' 上一篇
<%=GetNext(cn_id,"cn","note")%> ' 下一篇
标签:sql,上一篇,下一篇,查询
0
投稿
猜你喜欢
Python列表元素删除和remove()方法详解
2023-04-07 08:48:54
Python的五个标准数据类型你认识几个
2022-08-04 15:23:43
详解MySQL多版本并发控制机制(MVCC)源码
2024-01-20 04:20:38
Python自然语言处理之切分算法详解
2023-02-02 04:46:34
实例讲解MySQL中乐观锁和悲观锁
2024-01-19 00:46:35
mysql查询优化之100万条数据的一张表优化方案
2024-01-13 20:10:04
python3使用pyqt5制作一个超简单浏览器的实例
2023-04-12 19:44:51
Python元组 tuple的概念与基本操作详解【定义、创建、访问、计数、推导式等】
2022-12-08 10:14:45
分享一些可视信息设计资源
2009-10-06 15:19:00
python logging模块的使用
2021-09-20 18:57:05
Pandas.DataFrame重置列的行名实现(set_index)
2021-08-07 16:56:25
用Assets 面板为你的站点定做颜色
2007-02-03 11:39:00
一篇文章教你用Python实现一个学生管理系统
2022-01-22 16:25:05
python 写的一个爬虫程序源码
2022-08-10 16:00:47
MySQL数据库卸载的完整步骤
2024-01-13 13:12:52
python怎么去除字符串最后的换行符‘\\n’
2022-06-12 21:15:24
pytorch中的 .view()函数的用法介绍
2022-10-15 19:50:17
golang一些常用的静态检查工具详解
2024-04-25 13:16:17
CentOS Linux更改MySQL数据库目录位置具体操作
2024-01-23 18:13:49
Python出现segfault错误解决方法
2022-03-18 14:14:58