急！急！急！急！急！快来帮忙

给你个例子：
<% '*****************************************************************************************
  '处理翻页    %>
            
  <table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
  <td width="20" valign="top"><img src="../images/jian1.gif" width="20" height="20"></td>
      <td><b>Current Page: <%=intPage%> / <%=rs.pagecount%>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
              Total <% =rs.recordcount%> records</b>
            <br></td></tr>
  <tr><td align="center" colspan=2><b>Goto Page: </b>
        <% dim pageField
          pageField=int(rs.pagecount/10)
            
          if  pageField>0 then 
              Response.Write "<a href=index.asp?page=" & ((pageField-1)*10+9) & "><font size=3>上十页</font></a>"
          end if 
          for i=pageField*10+1 to  pageField*10+10
              if i<=rs.pagecount then
                  if i=intpage then
                      response.write "<font size=4 color=red>" & i & "</font>&nbsp;"
                  else
                      Response.Write "<a href=index.asp?page=" & i & "><font size=4>" & i & "</font></a>&nbsp;"
                  end if
              end if 
          next
          if int(rs.pagecount/10)>pagefield then 
              Response.Write "<a href=index.asp?page=" & (PageField+1)*10+1 & "><font size=3>下十页</font></a>"
          end if 
        %>
            
</td></tr></table>