请把下面的代码改成如本论坛的分页显示效果：
cPageInfo=""
If Ars.RecordCount<>0 Then
Ars.PageSize=10
If nPage>Ars.PageCount Then nPage=Ars.PageCount End If
Ars.AbsolutePage=nPage

cPageInfo=""
If nPage>1 Then cPageInfo=cPageInfo&"[<a href='javascript:goQuery(1)' target=_self title=首页><font face=webdings>9</font></a>][<a href='javascript:goQuery("&nPage-1&")' target=_self title=上一页><font face=webdings>7</font></a>]" End If
cPageInfo=cPageInfo&"[页"&Ars.AbsolutePage&"/"&Ars.PageCount&"][数"&Ars.PageSize&"/"&Ars.RecordCount&"]"
If nPage<Ars.PageCount Then cPageInfo=cPageInfo&"[<a href='javascript:goQuery("&nPage+1&")' target=_self title=下一页><font face=webdings>8</font></a>][<a href='javascript:goQuery("&Ars.PageCount&")' target=_self title=尾页><font face=webdings>:</font></a>]" End If

你也不整理一下，这么乱，怎么给你改啊

这还乱吗 ，这已经是最简捷的了·