xihongshi

<?php
/*
php链接access并分页示例
程序制作guoyansheng
以下只是做出基本例子，并没有对程序进行完善和优化。
数据库名称： qingzhou
表名：php_admin
字段：
user_id
password
username

*/
$scriptname = split('[/]',$_SERVER['SCRIPT_NAME']);
$filename = end($scriptname);//得到本页名称
$MM_Conn_STRING="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=". realpath("data/qingzhou.mdb") ." ;DefaultDir=". realpath(".");//abc.mdb为数据库的相对路径
$Conn=new COM("ADODB.Connection");
$RS =new COM("ADODB.RecordSet");//数据集
$Conn->open($MM_Conn_STRING);//链接打开数据源


$query="select * from php_admin";
$RS->open($query,$Conn,1,1);//执行语句,返回记录集
$pagesize=$RS->Pagesize=5;//设置每页显示条数

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>　";

?>
<table border=1 width=200 cellpadding=1 cellspacing=1>

<?

for ($m=1; $m<=$pagesize; $m++)//按照每页显示条数的设定进行循环
{

if (!$RS->EOF){//防止达到记录集尾产生错误
?>
<tr>
<td><? echo "".$RS->fields["username"]->value."";?></td>
<td><? echo "".$RS->fields["password"]->value."";?></td>
</tr>
<?
$RS->MoveNext();
}

}

if($RS->PageCount==0){//防止数据库为空
echo "<tr><td colspan="3">没有数据</td></tr>";
}
?></table><br><?
//防止数据库为空

if($RS->PageCount<>0){


echo "<a href=php_fenye.php?page=1>首页</a>";

if (!($nowpage<=1)){
echo " <a href=php_fenye.php?page=".($nowpage-1).">上一页</a> ";
}else{
echo " 上一页 ";
}
if (!($nowpage>=$RS->PageCount)){
echo " <a href=php_fenye.php?page=".($nowpage+1).">下一页</a> ";
}
else{
echo " 下一页 ";
}

echo "<a href=php_fenye.php?page=".$RS->PageCount.">尾页</a>";
}
//释放资源
$Conn->Close();
$RS=NULL;
$Conn =NULL;
?>