[Resolvido] Paginação

Boa tarde galera peguei aki no forúm um script de paginação pois gostaria q exibisse apenas 4 registros em cada tela, ou seja assim: Nome | Endereço | Cep | Email ... Segue abaixo o script :

<!--#include file="admin/config/conexao.asp"-->

<% call abre_conectar
cnn.CursorLocation = 3
Set tab = Server.CreateObject("Adodb.RecordSet")
tab.Pagesize = 4

 sql = "SELECT * FROM produtos "
 set tab = cnn.execute(sql)

 If tab.Eof Then
 Response.Write("")
 Else
 PaginaAtual = CInt(Request.Querystring("Pages"))

 If PaginaAtual = 0 Then
 PaginaAtual = 1
 End If

 tab.AbsolutePage = PaginaAtual
 Num = tab.PageCount

 While Not tab.Eof And tab.AbsolutePage = PaginaAtual
 %>
<tr>
 <td height="22" bgcolor="#F7F7F7" class="classFonte01"> <img src="admin/<%=tab("foto")%>"> </td>

</tr>
 <%
 tab.MoveNext : Wend
 Anterior = PaginaAtual - 1
 Proximo = PaginaAtual + 1

 If Anterior <= 0 Then
 Anterior = 1
 End If

 If Proximo > tab.PageCount Then
 Proximo = tab.PageCount
 End If
 %>
<tr>
 <td height="30" colspan="2" align="right" bgcolor="#EBEBEB" class="classFonte01"><strong>Paginas:</strong> <%
 Jo = 1
 While Jo <= tab.PageCount

 If PaginaAtual = Jo Then
 Response.Write("["&Jo&"]  ")
 Else
 Response.Write("<a href=""paginacao.asp?Pages="&Jo&""" class=""classFonte01"" title=""Página "&Jo&""">"&Jo&"</a>  ")
 End If
 Jo = Jo + 1
 Wend
 End If

%> Desse jeito está assim: http://www.visaopedestais.com.br/novo/loji...cao.asp?Pages=1