Ir para conteúdo

POWERED BY:

Arquivado

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

valdir calixto

Buscas em vários campos

Por , em ASP Clássico

Recommended Posts

valdir calixto    0

valdir calixto
Postado

Estou fazendo uma consulta no qual tem um campo para digitar o nome do cobrador, um outra campo que pede a situação do cliente (QUITADO, MANTIDO, PROCON, JURIDICO) e um terceiro campo para fazer uma busca entre duas datas digitadas:

 

Exemplo: Cobrador : Joâozinho

Situação: Quitado

Data: 10/07/2007 até 15/07/2007

 

Ou seja vai me trazer na tela todos os clientes do cobrador joãozinho que estão quitados entre 10/07/2007 até 15/07/2007,

 

Existe uma situação que é o seguinte essas datas estão dentro de vários campos pois cada cliente tem sua compra parcelado em 12x. As formas de pagamento estão assim no banco de dados:

 

Emissão1

Vencimento1

Pagoem1

 

Emissão2

Vencimento2

Pagoem2

 

Emissão3

Vencimento3

Pagoem3

 

Assim por diante, então quando mandar fazer a busca de 10/07/2007 até 15/07/2007 tem que ser procurando essas informações iniciais e finais a partir do campo pagoem1.....pagoem2.....pagoem3...e assim por diante.

Abaixo está o código inicial.

 

 

CODE<% 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 action="consultaporcobrador.asp" method="post" name="form" target="centro"><table width="387" border="0" align="center" cellpadding="0" cellspacing="0"><tr> <td width="148"><font color="#000099"><strong>Digite o Cobrador</strong></font></td><td width="239"><input type="text" name="nome" size="25"></td></tr><tr> <td><font color="#000099"><strong>Digite a Situação</strong></font></td><td><input type="text" name="nome2" size="25"></td></tr><tr> <td height="24"> <div align="left"><font color="#000099"><strong>Digite a Data</strong></font></div></td><td><font color="#000099"><strong>DE</strong></font> <input name="nome3" type="text" id="nome3" size="8"><font color="#000099"><strong>ATÉ</strong></font> <input name="nome4" type="text" id="nome4" size="8"></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, varBusca, varBusca2, varBusca3, Varbusca4varBusca = Request.Form("nome")-------CAMPO PARA DIGITAR O NOME DO COBRADORvarBusca2 = Request.Form("nome2") ------ CAMPO PARA DIGITAR A SITUAÇÃO (MANTIDO, QUITADO....ETC)varBusca3 = Request.Form("nome3") ----- CAMPO PARA DIGITAR A DATA INICIALvarBusca4 = Request.Form("nome4") ------ CAMPO PARA DIGITAR A DATA FINALIf varBusca <> "" Then'monta a sql[b]strSQL = "SELECT * FROM search WHERE Cobrador LIKE '%" & varBusca & "%' AND Situacao LIKE '%" & varBusca2 & "%' OR Pagoem1 In ('%" & varBusca3 & "%') ORDER BY Ncto"[/b] -------BEM A PARTIR DAQUIE Q EU PRECISARIA FAZER AS BUSCAS NOS CAMPOS PAGOEM.....'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=70><b>Atribuição</b></td><td width=70><b>Valor</b></td><td width=100><b>Vencimento</b></td><td width=50><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=70> " & rs("Atribuicao") & "</td><td width=70>" & rs("Valor") & "</td><td>" & rs("Vencimento") & "</td><td align=center width=50> " & 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

Ted k'    126

Ted k'
Postado

Amigo você triplicou tropicos

 

A Primeira:

http://forum.imasters.com.br/index.php?showtopic=238527

 

A Segunda:

http://forum.imasters.com.br/index.php?showtopic=239071

 

E Essa:

 

Não duplique ou triplique os tópicos

 

Continua nesse...

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado 
strSQL = "SELECT * FROM search WHERE Cobrador LIKE '"&varBusca&"' AND Situacao LIKE '"& varBusca2&"' And (Pagoem1 Between '"& varBusca3 &"' And '"& varBusca4 &"') Or (Pagoem2 Between '"& varBusca3 &"' And '"& varBusca4 &"') Or (Pagoem3 Between '"& varBusca3 &"' And '"& varBusca4 &"') Or ORDER BY Ncto"

Compartilhar este post

Link para o post
Compartilhar em outros sites

valdir calixto    0

valdir calixto
Postado

And (Pagoem1 Between '"& varBusca3 &"' And '"& varBusca4 &"') Or (Pagoem2 Between '"& varBusca3 &"' And '"& varBusca4 &"') Or (Pagoem3 Between '"& varBusca3 &"' And '"& varBusca4 &"') ORDER BY Ncto"

 

o problema é o seguinte esse and (e) esta dando um problema que só vai trazer os resultados se todas as condições forem verdadeiras. ex

 

joão

mantido

10/07/2007 a 20/07/2007

 

se eu colocar só joão não acha nada

 

se eu colocar joão e mantidos não acha, pq estou deixando a data em branco.

 

PQ O CÓDIGO ESTÁ FICANDO * SELECIONA DE SEARCH ONDE COBRADOR COMO............E OBSERVACAO COMO..............E (PAGOEM1 ENTRE.......E...........). OU SEJA OS 3 PARAMENTROS TEM QUE SER VERDADEIRO PARA ME RETORNAR VALORES.

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

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

  Aceito