Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Bom dia galera eu tenho uma paginação q está mq exibindo assim ::
****
produto1 produto2 produto3
[1][2][3]
eu preciso exibir assim ::
****
produto1 produto2 produto3
produto1 produto2 produto3
[1][2]
ou seja além de eu poder editar o número de colunas gostaria tbm de editar o número de linhas, a serem exibidas na mesma página ...
minha paginação ::
<body background="img/fundo.jpg" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" scroll="no">
<table width="100%" height="100%" cellpadding="6" cellspacing="0">
<tr>
<td height="135" valign="top" background="img/fundo_int.jpg" bgcolor="#f2f2f2">
<table width="100%" height="100%" cellpadding="0" cellspacing="4" background="img/fundo_int.jpg" bgcolor="#f2f2f2">
<tr>
<td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="4">
<tr>
<!--#include file="admin/config/conexao.asp" -->
<% id1=request.QueryString("detalhe")
call abre_conectar
cnn.CursorLocation = 3
Set tab = Server.CreateObject("Adodb.RecordSet")
tab.Pagesize = 3
tab.Open "Select * From produtos WHERE id_categoria = '" & id1 & "' ",cnn
'sql = "SELECT * FROM produtos WHERE id_categoria = '" & id1 & "'"
'set tab = cnn.execute(sql)%>
<td><div align="left" class="titulo1"><%=tab("id_categoria")%></div></td>
</tr>
<tr>
<td colspan="3" class="texto1"></td>
</tr>
<tr>
<% If tab.Eof Then
Response.Write("")
Else
PaginaAtual = Request.Querystring("Pages")
If PaginaAtual = "" Then
PaginaAtual = 1
Else
PaginaAtual = CINT(PaginaAtual)
End If
tab.AbsolutePage = PaginaAtual
Mostrou = 0
While Not tab.Eof And Mostrou < tab.Pagesize
Mostrou = Mostrou + 1
%>
<td height="22" class="classFonte01"><div align="center"><a href="admin/<%=tab("foto")%>" title="<%=tab("cod_produto")%>" rel="lightbox"><img src="admin/<%=tab("foto")%>" width="100" height="80" border="0" alt="" /></a></div></td>
<td width="635" height="30"><div align="left"><span class="titulo2"><%=tab("cod_produto")%></span></div></td>
<%
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 %>
<table>
<tr>
<td height="30" colspan="2" align="right"><strong></strong> <br><br><br>
<%
Jo = 1
While Jo <= tab.PageCount
If PaginaAtual = Jo Then
Response.Write("["&Jo&"] ")
Else
Response.Write ("<a href=""detalhe_catalago.asp?Pages="& Jo &"&Detalhe="& ID1 &""" align=""right"" title=""Página "& Jo &""">"& Jo &"</a> ")
End If
Jo = Jo + 1
Wend
End If%><%call fecha_conectar
set tab = nothing%>
</td>
</table>
</body>Carregando comentários...