给万博系统的新闻系统增加分页功能[配有详细说明]

2024-10-23 05:36:02

给万博系统的新闻系统增加分页功能,无需修改数据库,只需改变一个文件,就可以了.
如果将后台的Webediter增加一个插入分页符,那就更完美了.我还没加这个.

本例是在后台录入新闻时,在需要分页的位置插入分页符: {＄html_page＄} 就可以了.

代码如下,有详细说明
newsshow.asp

<HTML>
<HEAD>
<TITLE><%=sitename%></TITLE>
<META HTTP-EQUIV="Content-Type" C>
<link href="images/CSS.css" type=text/css rel=stylesheet>
</HEAD>
<body  topmargin="0">
<table width="780" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td colspan="3"></td>
  </tr>
  <tr>
    <td width="145" align="left" valign="top"></td>
    <td align="left" valign="top" ><table width="625"  border="0" cellspacing="0" cellpadding="0">

<tr>
          <td width="17" height="20"> </td>
          <td width="598"> </td>
          <td width="10"> </td>
        </tr>
        <tr >
          <td width="17"><% idd=trim(request.querystring("id"))
             set rsr=server.createobject("adodb.recordset")
             sql="select * from News where  Putout=true and id="&idd
             rsr.open sql,conn,1,3
    if not rsr.eof then

Newcontent=rsr("Newcontent")
    Newtitle=rsr("Newtitle")
                Putman=rsr("Putman")
    kig=rsr("kig")
    kig=kig+1
    addtime=rsr("addtime")
    rsr("kig")=kig
    rsr.update
    else
    response.Write"找不到记录，发生导常错误，请联系管理员！"
    end if
'这里要处理接收到的分页参数，以此来进行显示第几页的内容
'下面这两句就是如果没有page这个参数传来就让变量pageNum取显示第一页的值：0
If Request("page")="" Then
pageNum=0
'否则就给变量赋值为传递来的page里的参数，来显示其他页
Else
pageNum=Request("page")
End if
%>
<%
'如果加了可选执行UBB代码，可以加上下面的代码
'rs("NoUBB")是数据库里关于禁用UBB的字段，0为禁用，1为执行
'If rsr("NoUBB")=0 then
'为避免和文章内容相连出现错误，用Replace函数把分页代码“{＄html_page＄}”的前后各加一个全角的
'rs("content")是数据库里正文的字段，在这里加上UBB或者禁用UBB
Content=Replace(Newcontent,"{＄html_page＄}","　{＄html_page＄}　")
'Elseif rsr("NoUBB")=1 then
'Content=Replace((ubb(Newcontent)),"{＄html_page＄}","　{＄html_page＄}　")
'End if
%></td>
          <td height="22" align="center" class="NEWS_title"><%=Newtitle%><br>
<hr size="1" noshade  color="#666666"></td>
          <td width="10"> </td>
        </tr>
        <tr>
          <td rowspan="3"> </td>
          <td height="303" valign="top" ><%
'这里就是关键了
'我们用split函数将文章分段取出存入变量content
ContentStr=split(Content,"{＄html_page＄}")
'按照刚才从URL参数中取得的要显示那面的那个变量，就循环显示一页
For i=pageNum to pageNum
%>

<%=ContentStr(i) %>
<% Next %></td>
          <td rowspan="3"> </td>
        </tr>
        <tr>
          <td height="8" valign="top">  </td>
        </tr>
        <tr>
          <td height="8" align="center" valign="top">本文共分
<%
'分页的地方，用ubound(ContentStr)取得文章一共分为几页，注意这里是从0开始，所以总页数需要加1
For p = 0 to ubound(ContentStr)
'链接还是本页面，只不过文章ID参数后面还要加上一个分页的参数:page
%>
<a href="newsshow.asp?ID=<%=request("ID")%>&page=<%=p%>" class=""><%=p+1%></a>
<% Next %>页</td>
        </tr>
        <tr>
          <td height="40"> </td>
          <td height="60" valign="bottom"><table width="100%"  border="0" cellpadding="5" cellspacing="1" bgcolor="#CECECE">
            <tr bgcolor="#FFFFFF" >
              <td width="16%" align="right" bgcolor="#CECECE" >发布  者：</td>
              <td width="20%" bgcolor="#FFFFFF"> <%=Putman%></td>
              <td width="15%" align="right" bgcolor="#CECECE">添加时间：</td>
              <td width="20%" bgcolor="#FFFFFF"> <%=addtime%></td>
              <td width="15%" align="right" bgcolor="#CECECE">点  击  数：</td>
              <td width="15%"><%=kig%></td>
            </tr>
          </table></td>
          <td> </td>
        </tr>
    </table></td>
    <td> </td>
  </tr>
  <tr>
    <td colspan="3"></td>
  </tr>
</table>
</body>
</html>

给万博系统的新闻系统增加分页功能[配有详细说明]

给万博系统的新闻系统增加分页功能,无需修改数据库,只需改变一个文件,就可以了. 如果将后台的Webediter增加一个插入分页符,那就更完美了.我还没加这个. 本例是在后台录入新闻时,在需要分页的位置插入分页符: {＄html_page＄} 就可以了. 代码如下,有详细说明 newsshow.asp  <HTML> <HEAD> <TITLE><%=sitenam
php实现分页功能的详细实例方法

分页效果在网页中是常见的,可是怎样才能实现分页呢,今天做了两种方法来实现一下分页的效果. 首先,我们需要准备在数据库里面准备一个表,并且插入数据,这些都是必需的前提工作了,不多说,如图所示(库名为jereh,表名为n_content): 步骤分析: 我们需要分页的话,需要用到 "select * from tableName limit num1,num2";这是一个限定查询的语句,后面跟两个参数,num1为从第几个开始查找,num2为查找的信息的个数,如我想查找2,3,4这三条数据,
Python如何给函数库增加日志功能

问题你想给某个函数库增加日志功能,但是又不能影响到那些不使用日志功能的程序. 解决方案对于想要执行日志操作的函数库而已,你应该创建一个专属的 logger 对象,并且像下面这样初始化配置: # somelib.py import logging log = logging.getLogger(__name__) log.addHandler(logging.NullHandler()) # Example function (for testing) def func(): log.crit
JS如何为promise增加abort功能

目录概述 promise race方法重新包装promise AbortController Axios插件自带取消功能概述 Promise只有三种状态:pending.resolve.reject,一个异步的承诺一旦发出,经历等待(pending)后,最终只能为成功或者失败,中途无法取消(abort). 为promise提供abort功能的思路有两种: 手动实现abort,触发取消后,异步回来的数据直接丢弃(手动实现,比较稳妥) 使用原生方法AbortController中断请求(实验
vue实现一个简单的分页功能实例详解

这是一个简单的分页功能,只能够前端使用,数据不能通过后台服务器进行更改,能容已经写死了. 下面的内容我是在做一个关于婚纱项目中用到的,当时好久没用vue了,就上网区找了别人的博客来看,发现只有关于element_ui的,基本全是,对自己没用什么用,就自己写了一个,效果如下: 点击相应的按钮切换到对应的内容内容: 下面我只发核心代码,css样式就不发了,自己想怎么写怎么写  <ul class="blog-lists-box"> <
也谈用JSP实现新郎、sohu新闻系统的技术。

我这两天刚好完成了这样一个类似的系统,希望和大家探讨探讨jsp实现的技术. 新浪 sohu这样的系统应该是类似的,就是后台动态生成前台的html页面,不管后台用什么工具. 因为公司逼下来,要做这样的新闻系统,没有办法,连着做了两天,总算搞定了,很快就会发布到公司主页上面当然我只做了一个后台管理的东西,用jsp+javabean来动态生成html文件我是这样实现的 1.首先要一个写好的htm文件模板,后台用Writer对象来写文件,然后几个需要替换的地方如新闻标题.新闻内容直接根据输
使用PHP制作新闻系统的思路

我们可以用新闻系统来存储新闻,我们可以对新闻进行添加.删除等操作,这样减少了大家的工作量,为什么不实验一下. 首先,建立一个表. create table news ( n_id int(255) not null auto_increment, n_date datetime not null, news text not null, primary key(n_id) ); 第二步,设置你的登陆信息 $database_user_name="root";
python在linux系统下获取系统内存使用情况的方法

本文实例讲述了python在linux系统下获取系统内存使用情况的方法.分享给大家供大家参考.具体如下: """ Simple module for getting amount of memory used by a specified user's processes on a UNIX system. It uses UNIX ps utility to get the memory usage for a specified username and pipe it
C++设置系统时间及系统时间网络更新的方法

本文实例讲述了C++设置系统时间及系统时间网络更新的方法.分享给大家供大家参考.具体实现方法如下: 复制代码代码如下: //根据返回的时间设置系统时间 void setTimeFromTP(ULONG ulTime) { FILETIME ft; SYSTEMTIME st; //将基准时间转换成windows文件时间 st.wYear = 1900; st.wMonth = 1; st.wDay = 1; st.wHo
PHP消息队列实现及应用详解【队列处理订单系统和配送系统】

本文实例讲述了PHP消息队列实现及应用.分享给大家供大家参考,具体如下: 在互联网项目开发者经常会遇到『给用户群发短信』.『订单系统有大量的日志需要记录』或者在秒杀业务的时候服务器无法承受瞬间并发的压力. 这种情况下,我们怎么保证系统正常有效的运行呢? 这个时候,我们可以引入一个叫『消息队列』的概念来解决上面的需求. 消息队列的概念.原理和场景在高并发的时候,程序往往无法做到及时的处理.我们引入一个中间的系统,来进行分流和减压. 所以从本质上讲:消息队列就是一个队列结构的中间件.也就是说,你把

给万博系统的新闻系统增加分页功能[配有详细说明]

相关推荐

随机推荐