Ir para conteúdo
Fórum Script Brasil

Brenno Leonardo

Membros
  • Total de itens

    3
  • Registro em

  • Última visita

Tudo que Brenno Leonardo postou

  1. Olá!!! Como faço para ordenar uma tabela ao clicar no título de uma coluna??? Tenho uma tabela composta de dados buscados de um BD SQL. Gostaria que a tabela fosse ordenada sempre que o usuário clicasse no título de uma coluna. Tem que ser ordenada em ordem crescente. Alguém sabe como me ajudar??? Abraços!!!
  2. É exatamente essa a minha dificuldade. Não sei como fazer a Querystring trabalhar em harmonia com a Paginação. Se ainda puder me ajudar, ficaria muito grato, mesmo que seja na semana que vem, não tem problema. Se eu conseguir resolver antes, posto aqui. Obrigadasso, desde já. Amigo, não verifiquei o codigo, pois já estou de saida, mas se tudo esta funcionando perfeitamente, verifique apenas suas Query Strings. O problema esta exclussivamente nelas, por isso gera confução, uma vez que as QueryStrings tem a função de resgatar valores, esses valores, estão contidos nos links de sua paginação, então de Uma Duas.. Ou são suas QueryStrings, ou são os Links que compõem sua paginação que estão passando valores incorretos!! Qualquer coisa, tenho certeza que tera pessoas disponivéis que irão prestar auxílio neste tópico a você.. Abraços.. Tenha uma Boa Noite! É exatamente essa a minha dificuldade. Não sei como fazer a Querystring trabalhar em harmonia com a Paginação. Se ainda puder me ajudar, ficaria muito grato, mesmo que seja na semana que vem, não tem problema. Se eu conseguir resolver antes, posto aqui. Obrigadasso, desde já.
  3. Também estou com um problema em paginação. Vou exemplificar: Tenho um banco de dados com 100 registros. Quando faço uma consulta geral a paginação funciona perfeitamente. Me mostra a página contendo 10 registros, o botão "PRÓXIMO" (de próxima página) funcionando corretamente e a instrução "PÁGINA 1 DE 10". Perfeito, como deve ser. Quando faço um filtro - por exemplo, listar apenas a cidade de Brasília, que contém apenas 30 registros- a 1ª página mostra pra mim os 10 primeiros registros, a instrução "PÁGINA 1 DE 3" e o botão "PRÓXIMO" (até aqui tudo certo). Ocorre que, apartir daí, quando clico no botão "PRÓXIMO" (que deveria mostrar os próximos 10 registros de Brasília), ele volta para a consulta geral, mostrando novamente todos os registros do BD, e volta para a instrução "PÁGINA 1 DE 10". Gostaria de fazer com que, ao fazer um filtro e clicar no botão "PRÓXIMO", ele me mostrasse apenas a consulta referente àquele filtro. Não sei se fui claro, mas segue o código abaixo: <body link=#002884> <% Parametro = Request.QueryString("Parametro") Campo_Busca = Trim(Request("string_busca")) if Campo_Busca = "" then sql = "SELECT * FROM Base_Controle_Interno WHERE Grupo='"&Parametro&"' order by Operacao;" else sql = "SELECT * FROM Base_Controle_Interno WHERE Grupo='"&Parametro&"' AND (" sql = sql & " Operacao LIKE '%" & Campo_Busca & "%'" sql = sql & " Or Situacao_Operacao LIKE '%" & Campo_Busca & "%'" sql = sql & " Or Situacao_Contrato LIKE '%" & Campo_Busca & "%'" sql = sql & " Or Tomador LIKE '%" & Campo_Busca & "%'" sql = sql & " Or SR_Vinc LIKE '%" & Campo_Busca & "%'" sql = sql & " Or PV_Vinc LIKE '%" & Campo_Busca & "%'" sql = sql & " Or Gestor LIKE '%" & Campo_Busca & "%'" sql = sql & " Or Programa LIKE '%" & Campo_Busca & "%'" sql = sql & " Or Data_Assinatura='" & Campo_Busca & "'" sql = sql & " Or Data_Vigencia LIKE '%" & Campo_Busca & "%')" end If Set conn = Server.CreateObject("ADODB.Connection") conn.open(ConectaSQL) set rs = Server.CreateObject ("adodb.Recordset") rs.Open sql, conn, 3, 3 //PAGINAÇÃO rs.PageSize = 10 'quantidade de registros por página. if rs.EOF then Response.Write "nenhum registro encontrado" Response.End else if Request.QueryString("pagina")="" then pagina=1 else if cint(Request.QueryString("pagina"))<1 then pagina=1 else if cint(Request.QueryString("pagina"))> rs.PageCount then pagina=rs.PageCount else pagina=Request.QueryString("pagina") end if end if end if end if rs.AbsolutePage=pagina intrec=0 %> <table> ---CONTEÚDO HTML--- <br> <%x=Request.ServerVariables("SCRIPT_NAME")&"?Parametro="&Parametro%> <form action="<%=x%>" method="post"> Pesquisa por <input type=text name="string_busca" size=15 value="<%=Request("string_busca")%>" style="color: #808080; padding-top: -20px; padding-bottom: -20px" > <input type=submit value="ok" name="ok" style="padding-top: -10px; padding-bottom: -10px"> </form> <p><b><%=rs.recordcount%></b> operações encontradas.<br></p> </font> </p> </td> </tr> </table> <table align=center border="0" width="99%" cellpadding="5" cellspacing="2"> <tr class="titulos_registros"> <td align=center width="48">Operação</td> <td align=center width="35">Ano</td> <td align=center width="49">Situação Operação</td> <td align=center width="153">Situação Contrato</td> <td align=center width="101">Tomador</td> <td align=center width="42">SR</td> <td align=center width="48">PV</td> <td align=center width="52">Gestor</td> <td align=center width="62">Programa</td> <td align=center width="63">Assinatura</td> <td align=center width="61">Vigência</td> </tr> <% While not rs.EOF and intrec < rs.PageSize %> <tr class="registros_tabela" onMouseOver="this.style.backgroundColor='#CCE7FF';" onMouseOut="this.style.backgroundColor='';"> <td style="cursor: hand" width="50" align="center"><%=rs.Fields("Operacao")%></td> <td width="37" align="center"><%=rs.Fields("Ano_Orcamento")%></td> <td width="51" align="center"><%=rs.Fields("Situacao_Operacao")%></td> <td width="155" align="center"><%=rs.Fields("Situacao_Contrato")%></td> <td width="103" align="center"><%=rs.Fields("Tomador")%></td> <td width="44" align="center"><%=rs.Fields("SR_Vinc")%></td> <td width="50" align="center"><%=rs.Fields("PV_Vinc")%></td> <td width="54" align="center"><%=rs.Fields("Gestor")%></td> <td width="64" align="center"><%=rs.Fields("Programa")%></td> <td width="65" align="center"><%=rs.Fields("Data_Assinatura")%></td> <td width="63" align="center"><%=rs.Fields("Data_Vigencia")%></td> </tr> <% rs.MoveNext intrec=intrec+1 if rs.EOF then Response.Write "" end if wend %> </table> </td> </tr> <tr> <td align=center bgcolor="#E1EBFF"><br> <font face="Arial" size="2" color=#002884> <% if pagina > 1 then %> <a href="consulta.asp?Parametro=<%=Parametro%>&pagina=<%=pagina-1%>">< Anterior</a> | <% end if if strcomp(pagina,rs.PageCount) <> 0 then %> <a href="consulta.asp?Parametro=<%=Parametro%>&pagina=<%=pagina + 1%>">Próxima >></a> <% end if %> <p> Página <b><%=pagina%></b> de <b><%=RS.PageCount%></b> <br> </p> </font> </td> </tr> <tr> <td background=../../Imagens/rodape.gif height=31> </td> </tr> </table> <% conn.close set conn=nothing %> </body> </html> Espero que alguém possa me ajudar. Agradeço muito.
×
×
  • Criar Novo...