Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

valdir calixto

Busca com filtragem

Recommended Posts

Estou fazendo uma busca, no qual em uma tabela eu tenho um campo chamado Vencimento (QUE RECEBE VALORES, 05, 10, 15, 20, 25 E 30) e outro observacao (que recebe: MANTIDO, PROCON, JUIZADO, ACORDO, 1º PARCELA).

 

Na minha busca eu quero que ele apresente para mim os clientes com vencimento xxxx (Que vai ser digitado em um campo text), mas que não aparecem aquelas do vencimento escolhido que tem a observacao "PROCON, JUIZADO". No código abaixo ele vem com todos os clientes ou seja não faz uma filtragem não destigue o que é PROCON, JUIZADO, QUITADO, MANTIDO, ACORDO.

 

<% Option Explicit %><head><title></title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body bgcolor="#F8BF6B" link="#000000" vlink="#000000" alink="#000000"><form name="form" method="post" action="buscavencimento.asp"><table width="387" border="0" align="center" cellpadding="0" cellspacing="0"><tr> <td width="148"><font color="#000099"><strong>Digite o Vencimento</strong></font></td><td width="239"><input type="text" name="nome" size="25"></td></tr><tr> <td> </td><td> </td></tr><tr> <td colspan="2"> <div align="center"><input type="submit" name="btBuscar" value="Buscar"></div></td></tr></table></form><hr size="1"><table width="720" border="1" cellpadding="0" cellspacing="0" bordercolor="#333333"><tr><td width="50"><%Dim strSQL, oConn, rs, varBuscavarBusca = Request.Form("nome")If varBusca <> "" Then'monta a sqlstrSQL = "SELECT * FROM search WHERE Vencimento LIKE '%" & varBusca & "%' ORDER BY Ncto"'abre a oConnCall abre_oConn'executa a instrução SQLSet rs = oConn.Execute(strSQL)If rs.EOF And rs.BOF ThenResponse.Write "<script>alert('Nenhum cliente encontrado.');</script>"Response.EndElseResponse.Write ("<b>CTO</b></td><td width=700><b>Razão Social</b></td><td width=120><b>Vencimento</b></td><td width=100><b>Valor</b></td><td width=200><b>Observação<b></td><br><br>")While Not rs.EOF%></tr><tr><td><% Response.Write ("<a href='alterar2novo.asp?id_cliente="& rs("ID") & "'"">" & rs("Ncto") & "</a></td><td width=700> " & rs("Razaosocial") & "</td><td width=120>" & rs("Vencimento") & "</td><td>" & rs("Valor") & "</td><td align=center width=200> " & rs("Observacao") & "</td>")rs.MoveNextWendEnd Ifrs.CloseCall fecha_oConnSet rs = NothingEnd If%></tr></table><p><input type="button" name="Submit" value="Imprimir" Onclick="window.print('taglibs.txt')"></p></body></html>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tipo assim:

'monta a sql, sem observacoes PROCON e JUIZADOstrSQL = "SELECT * FROM search WHERE Vencimento LIKE '%" & varBusca & "%' AND Observacao NOT IN ( 'PROCON', 'JUIZADO' ) ORDER BY Ncto"
Essa query vai retornar tudo com a data que o cara digitou exceto os registros que possuam na observação as palavras PROCON e JUIZADO.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tipo assim:

'monta a sql, sem observacoes PROCON e JUIZADOstrSQL = "SELECT * FROM search WHERE Vencimento LIKE '%" & varBusca & "%' AND Observacao NOT IN ( 'PROCON', 'JUIZADO' ) ORDER BY Ncto"
Essa query vai retornar tudo com a data que o cara digitou exceto os registros que possuam na observação as palavras PROCON e JUIZADO.

OBRIGADÃO CARA....DEU CERTINHO, VALEU....QUALQUER COISA ESTAMOS AI

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.