limitar links dos numeros das paginas

fala!!!

entao, fiz a programacao de uma paginacao. está funcionando perfeitamente porém, pra ter uma navegação melhor, preciso arrumar um item q nao tenho a minima ideia de como fazer.

é o seguinte:

na paginacao q fiz, os links para mudar as paginas é tipo: "anterior 1 2 3 4 5 próxima", por exemplo. A questão é que se no BD tiver registros suficientes para 100 páginas, ele listará os links de 1 a 100.....isso ocupa mto espaço na página, fica feio e ruim ded navegar.

gostaria de fazer como nos sites de busca, q mostram um numero de paginas para clicar, e um link para exibir o proximo "bloco"... por exemplo: mostra de 1 a 10. dae clicando na 8, qdo abrisse a pagina apareceria de 4 a 13, por exemplo..... é apenas uma maneira pra ficar melhor visualmente.

de repente seria o caso de ter um campo pra digitar a página q deseja ir...

enfim....preciso de ajuda!!! http://forum.imasters.com.br/public/style_emoticons/default/upset.gif

a maneira q está hj é a seguinte (só a tal parte dos links):

<%c=c+1If (c MOD 9) = 0 Then Response.Write "</tr><tr>" & Chr(13) '--------------------------------------------------------------------------------------------- FIM DOS REGISTROS A SER PAGINADOS.. RS.MoveNext ' Acrescenta +1 ao contador intrec=intrec+1 'Se for EOF (fim de arquivo), imprimir branco na telaWend 'fim do loop%> </div></td> </tr> </table> <td> <font size="1" face="Verdana, Arial, Helvetica, sans-serif"> <% 'Vamos verificar se não é a página 1, para podermos colocar o link “anterior”. IF intpagina > 1 then %> </font></td> <font size="1" face="Verdana, Arial, Helvetica, sans-serif"></tr> </font> <tr> <td colspan="4"> <font size="1" face="Verdana, Arial, Helvetica, sans-serif"><a href="index.asp?pagina=<%=intpagina-1%>">Anterior</a>   <% END IFFor i = 1 To rs.PageCount If i <> Cint(intpagina) Then %>   <a href="index.asp?pagina=<%=i%>"><%=i%></a>  <% Else %>  <span style="color:#f00;">[ <a href="index.asp?pagina=<%=i%>"><%=i%></a>]</span>  <% End IfNext'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página IF strcomp(intpagina,RS.PageCount) <> 0 then %> <a href="index.asp?pagina=<%=intpagina + 1%>">Próxima</a> <% END IF%> </font></td> </tr> <p><font size="1" face="Verdana, Arial, Helvetica, sans-serif"></table> </font></p>

agradeço desde ja!!!!

abço!

marcos hunger.