Consulta Simples

[avontzdnb]

ae galera.. to denovo enxendo o saco de vocês.. mas é pela.. pela ..ultima vez.. até que to me virando bem sozinho.. mas isso aqui esta me torrando a paciencia..

<%

ConnString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=e:\home\acea\dados\dados.mdb;"

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open ConnString

Set rs= Server.CreateObject("ADODB.Connection")

if busca2 = "" then ** FUNCIONA**

sql= "select * from Principal where Nome = '" & request.form("busca1") & "'"

Set rs=conexao.execute(sql)

elseif busca1 = "" then **não FUNCIONA**

sql= "select * from Principal where Icq = '" & request.form("busca2") & "'"

Set rs=conexao.execute(sql)

elseif busca1 = "" and busca2 = "" then ** TB NAOO!! **

response.Redirect("forum.asp?cmd=ler")

else  ** muito MENOS!! **

sql= "select * from Principal where Nome = '" & request.form("busca1") & "' and Icq = '" & request.form("busca2") & "'"

Set rs=conexao.execute(sql)

end if

%>

Quando é so por nome.. ele funciona que funciona lindooooooo!! porem.. quando é por categoria.. p*** merda.. não funciona de jeito nenhum..

Os campos estao corretos do form que esta puxando estao corretos, os campos da base de dados está correto.. porem... so quando procuro pelo nome funciona!!

e ele não retorna nenhum erro.. o que sera que pode estar acontecendo?

A.. o formulario esta como post!.. porque get não funciona..

sera algo com o elseif?

agradeço desde já!

[Marcos-rj]

tenta assim só p/ ver:

[avontzdnb]

não cara.. não funciono não...

[avontzdnb]

tipo.. com isso.. ele não faz nada.. mas do outro jeito. so primeiro if funciona.. ..

e tipo.. para não pensarem..

Poxa. que cara burro.. o campo que esta puxando esta com o nome errado.. não deve estar funcionando.. porem.. eu inverti.. e ele acha sim!...

ou seja.. axo que o problema esta no elseif..

[dark0]

errr

peguei o trem andando..

mas já tentou usar trim na comparação?

pode ser que a variavel venha com espaço " " .. e por isso não entre na comparação..

é uma hipótese..

[avontzdnb]

até enxutando o codigo

<%

ConnString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=e:\home\acea\dados\dados.mdb;"

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open ConnString

Set rs= Server.CreateObject("ADODB.Connection")

sql= "select * from Principal where nome = '" & request.form("busca1") & "'"

sqlq= "select * from Principal where Icq = '" & request.form("busca2") & "'"

Set rs=conexao.execute(sql,sqlq)

%>

so funciona a primeira linha.. que seria o nome...

o outro não funciona...

ta aqui o form

<form name="form4" method="post" action="forum_relatorio.asp">

Nome:

        <input name="busca1" type="text" id="busca1">

        <br>

        Categoria:

        <input name="busca2" type="text" id="busca2">

       

      <td align="center"> <input name="submit3" type="submit"  value="Procurar">

</form>

[dark0]

ele dá erro?

ou simplesmente não seleciona nada?

um modo de debugar o codigo, é dar um response.write na variavel sql que não ta funcionando.. assim ele vai mostrar na tela como ela está sendo formada..

[avontzdnb]

ele não mostra nada.. :S

fica tudu em branco...

response.write(sqlq)

?

[avontzdnb]

ele faz sempre a primeira linha...

quando eu inverto.. a parece o icq.. e o valor da outra entra como 0

<%=response.write(sqlq)%> <BR><%=response.write(sql)%>

eu usei esse codigo.. dai apareceu

select * from Principal where Icq = 'cancelado'

0

[dark0]

<%

ConnString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=e:\home\acea\dados\dados.mdb;"

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open ConnString

Set rs= Server.CreateObject("ADODB.Connection")

sql= "select * from Principal where nome = '" & request.form("busca1") & "'"

sqlq= "select * from Principal where Icq = '" & request.form("busca2") & "'"

response.write sqlq

response.end

Set rs=conexao.execute(sql,sqlq)

%>

tb não mostra nada?

[avontzdnb]

se eu ponho o

response.write sqlq

response.end

onde você pediu. beleza.. ele mostra o que eu digitei.. mas não mostra a tabela

mass

se eu ponho apos o codigo.. tipo.. depois tabela.. ele se perde....e mostra o 0

[avontzdnb]

porque sera que ele so consegue processar a primeira linha

se eu coloco tudu junto.. tipo

sql= "select * from Principal where nome = '" & request.form("busca1") & "' and icq = '" & request.form("busca2") & "'"

Set rs=conexao.execute(sql)

ele funciona numa boa.. qual o problema de colocar mais de uma variavel executando..

ou ela mesmo de varias maneiras com os if´s

[dark0]

mano

<%

ConnString="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=e:\home\acea\dados\dados.mdb;"

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open ConnString

Set rs= Server.CreateObject("ADODB.Connection")

sql= "select * from Principal where nome = '" & request.form("busca1") & "'"

sqlq= "select * from Principal where Icq = '" & request.form("busca2") & "'"

Set rs1=conexao.execute(sql)

Set rs2=conexao.execute(sqlq)

assim deveria funcionar..

não sei se funciona 2 sqls dentro do mesmo RS..

%>

[Guest Guest]

vou testar hoje a noite.. valeuz cara.. é que eu não queria tipo.. fazer 3 paginas.. tipo.. uma só para busca de nome. outra so por categoria. e outra para as duas..

queria fazer tudu junto.... e deveria funcionar com if né...

se não funcionar deste jeito. .vo ter que apelar para essa solução.. de qualquer forma.. valeuz

[dark0]

deveria funcionar sim..

se você montar o if corretamente, ele deveria funcionar na boa..

[avontzdnb]

deveria.. mas não funfo.. e não sei porque... fiz uma gambiara..tres paginas.. dei a desculpa que a navegação ficaria mais facil e a pagina iria se moldar as necessidades do usuario..rsrsrs

bbom. a questao é que o cara gosto

mass estranho não funcionar nos elseif...