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
收藏随意^^请保留教程地址.