日韩精品中文字幕一区二区-日韩精品中文字幕一区-日韩精品中文字幕视频-日韩精品在线一区二区三区-第一页在线-第一福利视频

當前位置:首頁文章首頁 IT學院 IT技術(shù)

教你利用ASP實現(xiàn)上一篇,下一篇過程實例代碼分享

作者:  來源:  發(fā)布時間:2011-6-17 11:33:18  點擊:
這篇文章提供給大家分享的是關(guān)于利用ASP實現(xiàn)上一篇,下一篇過程實例代碼,希望能對大家有用。
Rem==上一篇==
Rem======================================================
Rem= 參數(shù)說明:
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= 參數(shù)函意和上過程一樣
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

實現(xiàn)代碼:
偶數(shù)據(jù)庫里有表:
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_note.asp?cn_id=4里引用上一篇下一篇
<%=GetPre(cn_id,"cn","note")%> ' 上一篇
<%=GetNext(cn_id,"cn","note")%> ' 下一篇

相關(guān)軟件

文章評論

軟件按字母排列: A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
主站蜘蛛池模板: 男男大尺度无删减床戏| 沈月个人简历资料| 最可爱的人 电影| 以家人之名小说原著| 陈薇薇简介 个人资料| 《风流艳妇》| 孙源| 叶子楣地下裁决| 花煞| 王小凤| 妹妹扮演的角色| 糟老头视频| douyin.com| 回复者术之重启人生| 乱世三义电视剧免费观看完整版| 一元二次方程计算题| 视频 | vk| 80后相声新人李丁个人简历| 卢载铉| 韶山行研学心得体会| 孙启皓| yoshizawa akiho| 香水有毒微电影无删减完整版 | 鬼娃娃花子| 战狼15电影在线观看 | 《缱绻少年人》| 我爱我爹全集高清版免费观看| 被告山杠爷| 局外人电影| 糯玉米和甜玉米哪个热量高| 东山飘雨西关晴| 《牵牛花》阅读答案| 免费播放电影大全免费观看| 免费完整版在线观看| 电影《大突围》免费观看国语| 男人的鸡鸡视频| 周秀娜三级大尺度视频| 山东卫视体育频道| 女生衣服| 燃烧电影| 老司机免费在线观看|