Botao anterior na paginação

[RELUVIARI 0]

e ai galerase eu estiver no 1º registro nao pode aparecer o botao de " anterior " alguém pode me ajudar ???estou usando recordeset para fazer essa paginaçãoobrigado galera!!

[Salgado 4]

Se a página for diferente de 1 então não mostre o botão página anterior, senão for igual a 1, mostre!

Nheimmm?

Né o contrairiu naum?

Mas tu é feio eim! :o

[Salgado 4]

Mas é fácil:

If Var_pagina >1 Then
'rotina para mostrar o botão Página anterior
End If

É só isso, pois se for igula à 1 ele não precisa mostrar! :wacko:

[RELUVIARI 0]

Salgado sem querer abusar cara , mais pq eu sou iniciante ainda.Com é essa rotina cara é nisso que eu estou me complicando.o código é esse ...me dá uma dica?<a class="link" href="minha_pag.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina-1%Anterior</a> - <a class="link" href="minha_pag.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina + 1%Próxima</a>valeu caras!!!!!!!!!!!

[Salgado 4]

Salgado sem querer abusar cara , mais pq eu sou iniciante ainda.

 

Com é essa rotina cara é nisso que eu estou me complicando.

 

o código é esse ...me dá uma dica?

 

 

<a class="link" href="minha_pag.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina-1%Anterior</a> -

 

<a class="link" href="minha_pag.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina + 1%Próxima</a>

 

valeu caras!!!!!!!!!!!

É só isso:

<%If intpagina >1 Then%>
<a class="link" href="minha_pag.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina-1%Anterior</a> -
<%End If%>
<a class="link" href="minha_pag.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina + 1%Próxima</a>

[RELUVIARI 0]

valeu cara era isso mesmo Foi um vacilo da minha parte não visualizar onde eu colocaria isso mais Obrigado mesmo cara Eis aki o código completo(caso alguém tenha dúvida também)<%id=request.QueryString("cliente")RS = ""Set RS = Server.CreateObject("adodb.recordset")RS.PageSize = 1 SQL = "select * From Clientesfone where cliente = '"& id &"' " RS.Open SQL,Conn,3,3IF RS.EOF then Response.Write "nenhum registro encontrado" Response.End 'paramos o programaELSE 'Definindo em qual pagina o visitante está IF Request.QueryString("pagina")="" then intpagina=1 ELSE IF cint(Request.QueryString("pagina"))<1 then intpagina=1 ELSE IF cint(Request.QueryString("pagina"))> RS.PageCount then intpagina=RS.PageCount ELSE intpagina=Request.QueryString("pagina") END IF END IF END IFEND IFRS.AbsolutePage=intpaginaintrec=0While intrec < RS.PageSize and not RS.EOF set RS2 = conn.execute("select * From Tipostelefone where Tipotelefone = ' "& RS("Tipotelefone") &" '")%><LINK href="css/style.css" type=text/css rel=stylesheet><div id="Layer1" style="position:absolute; left:150px; top:114px; height:px; z-index:5"><table width="98%"> <tr> <td> <a href="dadosgerais.asp?cliente=<%=request.QueryString("cliente")%>" class="Links"><img src="imagens/aba_dados.gif" border="0"></a>  <a href="enderecos.asp?cliente=<%=request.QueryString("cliente")%>" class="Links"><img src="imagens/aba_enderecos.gif" border="0"></a> </td><td width="17%" align="right"><a href="java script:history.go(-1)"><img src="imagens/aba_voltar.gif" border="0"></a></td></tr></table><table width="98%"> <tr> <td align="center" bgcolor="#336699" height="16"><font color="#EFFF00" size="2" face="Verdana"><b>Telefones</b></font></td> </tr></table><table width="98%"> <tr class="label"> <td>Tipo de Telefone</td> </tr> <tr class="dados"> <%do while not RS2.eof%> <td> <%response.write RS2("descricao")%> </td> </tr> <%RS2.movenext loop%> </table><table width="98%"> <tr class="label"> <td>Ddd</td> <td>Telefone</td> <td>Ramal</td> </tr> <tr class="dados"> <td><%response.write RS("ddd")%></td> <td><%response.write RS("telefone")%></td> <td><%response.write RS("ramal")%></td> </tr></table><table width="98%"> <tr class="label"> <td>Contato</td> </tr> <tr class="dados"> <td><%response.write RS("contato")%></td> </tr> <tr><td align="center"></table></div></body> <% RS.MoveNext ' Acrescenta +1 ao contador intrec=intrec+1 'Se for EOF (fim de arquivo), imprimir branco na tela IF RS.EOF then response.write " " END IFWend 'fim do loop'Vamos verificar se não é a página 1, para podermos colocar o link “anterior”. IF intpagina > 1 then %> <div id="Layer1" style="position:absolute; left:45%; top:280px; height:px; z-index:5"> <a class="linkmenuglobal" href="fones.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina-1%>"><< Anterior</a> </div><% END IF'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 %> <div id="Layer1" style="position:absolute; left:55%; top:280px; height:px; z-index:5"> <a class="linkmenuglobal" href="fones.asp?cliente=<%=request.querystring("cliente")%>&pagina=<%=intpagina + 1%>">Próxima >></a> </div><% END IF%>