欢迎来到天天文库
浏览记录
ID:9240874
大小:25.00 KB
页数:1页
时间:2018-04-24
《asp基础代码之——上一篇下一篇asp代码》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、ASP基础代码之——上一篇下一篇ASP代码<%`定义一个nextrs函数来找出下一篇的ID functionnextrsnextrsd=server.CreateObject(“adodb.recordset”)sql=”selecttop1*fromarticleswhereid>”&a1&”orderbyid”setnextrsd=conn.execute(sql)ifnextrsd.eofthenresponse.Write“下一篇:这是本分类下的最后一篇文章”elsea2=nextrsd(“id”
2、)response.Write“下一篇:”&nextrsd(“title”)&””endifendfunction`定义一个backrs函数来找出上一篇的IDfunctionbackrsbackrsd=server.CreateObject(“adodb.recordset”)sql=”selecttop1*fromarticleswhereid<”&a1&”orderbyiddesc”setbackrsd=conn.execute(sql)ifbackrsd.eofthenresponse.Write“上一篇:这是
3、本分类下的第一篇文章”elsea0=backrsd(“id”)response.Write“上一篇:”&backrsd(“title”)&””endifendfunction`取得传递过来的文章IDID=request(“id”)sql=”select*fromarticleswhereid=”&idsetrs=conn.execute(sql)a1=rs(“id”)%><%backrs%>4、的函数–><%nextrs%>
4、的函数–><%nextrs%>
此文档下载收益归作者所有