我常用的access数据库分页代码(PHP)

<?
//本分页代码是本人常用代码,经测试通过
//将代码复制到适当的地方,修改一下下面注释的位置即可使用,其它的代码基本不需要修改
$conn=new com("adodb.connection");
$conn->open("Driver={Microsoft Access Driver (*.mdb)};Dbq=".dirname(__FILE__)."\\数据库名.mdb"); //链接数据库,路径自已搞正确即可
$rs=new com("ADODB.recordset");
$sql="select * from 表名";//你的SQL语句
$rs->open($sql,$conn,1,1);
$href="*.php";//本页文件名称,用于翻页时指定路径
$pagesize=5;//这里是每页要显示的记录数
$rs->pagesize=$pagesize;
$totalsize=$rs->recordCount();
$totalpage=$rs->pagecount();
if ($TotalPage<1 ) {$TotalPage=1;}
$page=1;
if (isnumeric(trim($_GET["page"])) ){$page=trim($_GET["page"]);}
if ($page<1 || $page=="" ) {$page=1;}
if ($page>$totalpage ) {$page=$totalpage;}
if (! $rs->eof && ! $rs->bof )
{
      $rs->AbsolutePage=$page ;
      $i=1;
      while (! $rs->eof && ! $rs->bof && $i<=$rs->pagesize)
      {
?>
<table width="100%" border="0" cellspacing="0" cellpadding="4">
<tr>
<td bgcolor="#f9f9f9">在此输出记录列表,自已将表格插入在此即可.</td>
</tr>
</table>
<br>
<?
      $i=$i+1;
      $rs->movenext();
      }
}
?>
<!--下以代码基本不用改,直接复制到适当位置即可使用-->
<table width="100%" border="0" align="center" cellpadding="4" cellspacing="0">
<tr>
<td><div align="center">共 <font color="#FF0000">
<?=$totalsize?>
</font>条记录  
<? if ($page>1 ){?>
<a href="<?=$href?>?page=1&<?=$cx?>">首页</a>   <a href="<?=$href?>?page=<?=$page-1?>&<?=$cx?>">上页</a>
<? }else{?>
<font color=#999999> 首页   上页 </font>
<? }?>
  
<? if ($page<$totalpage ){?>
<a href="<?=$href?>?page=<?=$page+1?>&<?=$cx?>">下页</a>   <a href="<?=$href?>?page=<?=totalpage?>&<?=$cx?>">尾页</a>
<? }else{ ?>
<font color=#999999> 下页   尾页 </font>
<? }?>
   共 <font color="#FF0000">
<?=$totalpage ?>
</font>页   每页 <font color="#FF0000">
<?=$pagesize?>
</font>条 
<input name="page_num" type="text" id="page_num" value="<?=$page?>" size="4">
 
<input name="goto" type="button" id="goto" value="Go" onClick="location.href='<?=$href?>?page='+document.all.page_num.value+'&<?=$cx?>';">
</div></td>
</tr>
</table>