首页 > 日志 > 以人为本 > asp网站文章同分类上一篇下一篇代码

asp网站文章同分类上一篇下一篇代码

        很多网站的文章页面都会有上一篇下一篇这样的链接来方便我们跳转文章,其实这个代码很简单。

        我们假设文章所在的表为Article,文章id为w_id,文章标题为w_title,文章页面为article.asp,那么上一篇下一篇的代码就是:

        <%

        set rs=server.createobject("adodb.recordset")
        sql="select w_id,w_title from web_Article where w_id >"&w_id&" order by w_id"
        rs.open(sql),conn,1,1

        If rs.bof And rs.eof Then
        w_title="没有了"
       else
       w_title_d=rs("w_title")
       w_id=rs("w_id")
       w_title="<a href='/Article/Article/w_id.html"&w_id&" '>"&w_title_d&"</a>"

       end if     '上一篇代码结束


       set rs2=server.createobject("adodb.recordset")
       sql="select w_id,w_title from web_Article where w_id <"&w_id&" order by w_id desc"
       rs2.open(sql),conn,1,1
       If rs2.bof And rs2.eof Then
       w_title_up="没有了"      'w_title_upzhishi为了和上一篇代码不冲突,可以自己设定
       else
      w_id_up=rs2("w_id")
      w_title_u=rs2("w_title")
      w_title_up="<a href='/Article/Article/w_id/.html"&w_id_up&"'>"&w_title_u&"</a>"

      end if    '下一篇代码结束


      rs.close
      set rs=nothing  '关闭上一篇代码打开的数据库
      rs2.close
     set rs2=nothing   '关闭下一篇代码打开的数据库
      %>

     以上代码是所有文章上一篇下一篇的代码,那如果想要显示本分类下上一篇下一篇该如何写呢,其实只要把上面的代码稍微改动已瞎就可以实现了。

     再设定一个元素分类为l_id,我们只需要把

     sql="select w_id,w_title from web_Article where w_id >"&w_id&" order by w_id"这一行代码改为:

     sql="select w_id,w_title from web_Article where i_id=“&l_id&” and w_id >"&w_id&" order by w_id"

     就可以实现同意分类下上一篇下一篇的链接了。

     图片页面的上一张下一张也是这样写,把数据修改一下就ok了。

上一篇: 音乐版权之争最终因行政干预化解
下一篇: asp网站怎样获取文章第一张图片

亲,沙发正空着,还不快来抢?

评论审核未开启 记住我的个人信息 回复后邮件通知我
昵称:
邮箱:
网址:
回复:

Back to Top