php+access 分页代码
<?php $scriptname = split('[/]', $_SERVER['SCRIPT_NAME']); $filename = end($scriptname); $MM_Conn_STRING = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" . realpath("www.phprm.com/a.mdb") . " ;DefaultDir=" . realpath("."); $Conn = new COM("ADODB.Connection"); $RS = new COM("ADODB.RecordSet"); //数据集 $Conn->open($MM_Conn_STRING); //链接打开数据源 $query = "select * from doubt"; $RS->open($query, $Conn, 1, 1); //执行语句,返回记录集 $pagesize = $RS->Pagesize = 3; //设置每页显示条数 if ($RS->PageCount <> 0) { //防止数据库教程为空 if (!empty($_GET['page'])) { if ($_GET['page'] <= 0) { $RS->AbsolutePage = 1; $nowpage = 1; } elseif ($_GET['page'] > $RS->PageCount) { $RS->AbsolutePage = $RS->PageCount; $nowpage = $RS->PageCount; } else { $RS->AbsolutePage = $_GET['page']; $nowpage = $_GET['page']; } } else { $RS->AbsolutePage = 1; $nowpage = 1; } } else { $nowpage = 1; $pagesize = 0; } echo "当前显示第" . $nowpage . "页 "; echo "每页" . $pagesize . '条 '; echo "共有" . $RS->RecordCount . "条记录 "; echo "共有" . $RS->PageCount . "页<br> "; for ($m = 1; $m <= $pagesize; $m++) { echo " <table width=548 height=76 border=0 align=center cellpadding=0 cellspacing=1 bgcolor=#ededed <tr> <td width=100 rowspan=2 align=center valign=middle bgcolor=#FFFFFF><img src=smiles/0.gif width=20 height=20 /><br />姓名:" . $RS->fields["username"]->value . "</td> <td width=307 height=25 align=left bgcolor=#FFFFFF>问:" . $RS->fields["biaoti"]->value . "</td> <td width=137 align=left bgcolor=#FFFFFF>" . $RS->fields["wendate"]->value . "</td> </tr> <tr> <td height=50 colspan=2 align=left valign=top bgcolor=#FFFFFF>问题:" . $RS->fields["neirong"]->value . "<hr width=100% size=1 color=#CCCCCC> 回复</td> </tr> </table> "; $RS->MoveNext(); //if($RS->PageCount==0){ //echo "没有数据"; } if ($RS->PageCount <> 0) { //防止数据库为空 echo "<a href=$filename?page=1>首页</a> "; if (!($nowpage <= 1)) { echo "<a href=$filename?page=" . ($nowpage - 1) . ">上一页</a> "; } if (!($nowpage >= $RS->PageCount)) { echo "<a href=$filename?page=" . ($nowpage + 1) . ">下一页</a> "; } echo "<a href=$filename?page=" . $RS->PageCount . ">尾页</a> "; } //释放资源 $Conn->Close(); $RS = NULL; $Conn = NULL;
本文链接:http://www.phprm.com/code/35e726fb9105a0b9aa8030b5fc26d9ae.html
收藏随意^^请保留教程地址.