帝国cms7.2-utf实现内容分页在本页阅读全文教程

帝国cms7.2-utf的内容分页在本页阅读全文。在本页阅读全文，是方便用户体验的一个链接。实现方法我发现有两种：

1.新增页面all来实现：比如网易等。

2、js代码来实现：比如站长之家的 http://www.chinaz.com/web/2015/0403/395954.shtml

其中方法2体验最好，感觉舒服，但是实现对我有点难度。 方法1实现容易，用户体验略差，但是有利于seo。

下面实现了方法1，发出来请大家批判使用。

第一步、在自定义函数文件 /e/class/userfun.php中增加内容分页函数，代码为：

1. //返回内容分页
2. function hl_ShowTextPage($totalpage,$page,$dolink,$add,$type,$search=""){
3.         global $fun_r,$public_r;
4.         if($totalpage==1)
5.         {
6.                 return '';
7.         }
8.         $page_line=$public_r['textpagelistnum'];
9.         $snum=2;
10.         //$totalpage=ceil($num/$line);//取得总页数
11.         $firststr='<a title="Page">&nbsp;<b>'.$page.'</b>/<b>'.$totalpage.'</b> </a>&nbsp;&nbsp;';
12.         //上一页
13.         if($page<>1)
14.         {
15.                 $toppage='<a href="'.$dolink.$add[filename].$type.'">'.$fun_r['startpage'].'</a>&nbsp;';
16.                 $pagepr=$page-1;
17.                 if($pagepr==1)
18.                 {
19.                         $prido=$add[filename].$type;
20.                 }
21.                 else
22.                 {
23.                         $prido=$add[filename].'_'.$pagepr.$type;
24.                 }
25.                 $prepage='<a href="'.$dolink.$prido.'">'.$fun_r['pripage'].'</a>';
26.         }
27.         //下一页
28.         if($page!=$totalpage)
29.         {
30.                 $pagenex=$page+1;
31.                 $nextpage='&nbsp;<a href="'.$dolink.$add[filename].'_'.$pagenex.$type.'">'.$fun_r['nextpage'].'</a>';
32.                 $lastpage='&nbsp;<a href="'.$dolink.$add[filename].'_'.$totalpage.$type.'">'.$fun_r['lastpage'].'</a>';
33.         }
34.         $starti=$page-$snum<1?1:$page-$snum;
35.         $no=0;
36.         for($i=$starti;$i<=$totalpage&&$no<$page_line;$i++)
37.         {
38.                 $no++;
39.                 if($page==$i)
40.                 {
41.                         $is_1="<b>";
42.                         $is_2="</b>";
43.                 }
44.                 elseif($i==1)
45.                 {
46.                         $is_1='<a href="'.$dolink.$add[filename].$type.'">';
47.                         $is_2="</a>";
48.                 }
49.                 else
50.                 {
51.                         $is_1='<a href="'.$dolink.$add[filename].'_'.$i.$type.'">';
52.                         $is_2="</a>";
53.                 }
54.                 $returnstr.='&nbsp;'.$is_1.$i.$is_2;
55.         }
56.         $page=$page+1;
57.     $allpage='&nbsp;'.'<a href="'.$dolink.$add[filename].'_all'.$type.'#p'.$page.'">在本页阅读全文</a>';
58.         $returnstr=$firststr.$toppage.$prepage.$returnstr.$nextpage.$lastpage.$allpage;
59.         return $returnstr;
60. }

第二步 修改 e/class/funcitons.php文件，大约在3536行后增加些代码，其中//begin hl add for all read in myself page.为新增开始，//end hl add为新增结束。

1. ...
2.         WriteFiletext($file,$addlevel.$string);
3.                 }
4.                 //begin hl add for all read in myself page.
5.                 $file=$doclasspath.$newspath.$add[filename].'_all'.$filetype;
6.                 $string=$newstempstr;//模板
7.                 $newstext='';
8.                 for($j=1;$j<=$thispagenum;$j++){
9.                        $newstext=$newstext.'<a name="p'.$j.'"></a>'.$n_r[$j-1];
10.                 }
11.                 //替换变量
12.                 $string=str_replace('[!--'.$pf.'--]',$newstext,$string);
13.                 $string=str_replace('[!--p.title--]',$add[title],$string);
14.                 $string=str_replace('[!--next.page--]','',$string);
15.                 $string=str_replace('[!--page.url--]','',$string);
16.                 $string=str_replace('[!--title.select--]','',$string);
17.                 //写文件
18.                 WriteFiletext($file,$addlevel.$string);
19.                 //end hl add
20.         }
21.         else
22.         {...

第三步，修改帝国后台的系统参数，指定内容分页函数为我们自定义的函数即可。