1. <?php
2. /*文章分頁代碼*/
3.
4. $fp=fopen('txt.txt','r');
5. while (!feof($fp)){
6. $content.=fgets($fp);
7. }
8. $c_page="";
9. if(isset($_GET['page'])) $c_page=$_GET['page'];
10. $listlen=100; //分頁顯示字符數
11. $conlen=strlen($content); //內容長度
12. $j=0;
13. $listat[0]=0;
14. $lookat=0;
15. for ($i=1;$i<$conlen/$listlen+1;$i++){
16. //echo $conlen/$listlen;
17. if($lookat<$listlen)
18. $lookat=$listlen;
19. if($lookat>$conlen){
20. $j++;
21. $listat[$j]=$conlen;
22. break;
23. }
24. $endat=strpos($content,"\n",$lookat);
25. if($endat>$conlen-$listlen/5 or intval($endat)<1){
26. $j++;
27. $listat[$j]=$conlen;
28. break;
29. }else {
30. $j++;
31. $listat[$j]=$endat;
32. $lookat=$endat+$listlen;
33. }
34.
35. }
36. //print page
37. $pagenum=$j; //總頁數
38. $page=intval($c_page);
39. if(emptyempty($page) or $page<1 or $page>$pagenum) $page=1;
40. if($pagenum >1)
41. for ($i=1;$i<$pagenum+1;$i++){
42. echo " <a href=?page={$i}>{$i}</a> ";
43. }
44. echo "<br>";
45. $stag=$page-1;
46. $startb=$listat[$stag];
47. if($startb>0) //去除首個換行 www.2cto.com
48. $startb=$startb+1;
49. $cont=substr($content,$startb,$listat[$page]-$startb);
50. echo "<BR/>文章內容：<BR/>";
51. if($page>1)
52. echo "[接上頁] ";
53. echo $cont;
54.
55. ?>
作者：chaojie2009
