Erro em consulta

[adriano182 0]

Galera, estou com um erro na minha consulta. quer fazer uma consulta onde o usuario pode consultar por nome, convenio ou ambos.

 

O erro que está dando é que se deixo o campo convenio nao esta filtrando. posso deixar nusuario em branco e escrever qualquer coisa em convenios, que lista todos os cadastrados.

 

o que será que está errado??

 

desde já, obrigado!!

<%nome = Request.form("nome")convenios = Request.form("convenios")x = Server.MapPath("db/medico.mdb")Set Conexao = Server.CreateObject("ADODB.Connection")liga = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& x conexao.open ligaset medico = server.createobject("ADODB.Recordset")medico.ActiveConnection = conexaoif nome <>"" And convenios <> "" then medico.open "SELECT * FROM medico WHERE nome LIKE '%" & nome &"%' AND convenios LIKE '%" & convneios &"%' "  while not (medico.eof)   response.write "Nome do Medico:" & medico.fields("nome")%><br><%   response.write "Convenios:" & medico.fields("convenios")%><br><br><%medico.movenext wendelse  if nome = "" And convenios <> "" then   medico.open "SELECT * FROM medico WHERE convenios LIKE '%" & convneios &"%' "    while not (medico.eof)     response.write "Nome do Medico:" & medico.fields("nome")%><br><%     response.write "Convenios:" & medico.fields("convenios")%><br><br><%  medico.movenextwend  else   if nome <> "" And convenios = "" then     medico.open "SELECT * FROM medico WHERE nome LIKE '%" & nome &"%' "   while not (medico.eof)       response.write "Nome do Medico:" & medico.fields("nome")%><br><%       response.write "Convenios:" & medico.fields("convenios")%><br><br><%    medico.movenext     wendend if end if  end ifif nome = "" AND convenios = "" then response.write "Não Existem Médicos com os Dados Selecionados!"end ifConexao.closeSet Conexao = nothing%>

[hargon 64]

Tenta isso

 

<%
nome = Request.form("nome")
convenios = Request.form("convenios")

x = Server.MapPath("db/medico.mdb")


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

liga = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& x 

conexao.open liga

set medico = server.createobject("ADODB.Recordset")
medico.ActiveConnection = conexao

if (nome <>"") or (convenios <> "") then
      medico.open "SELECT * FROM medico WHERE nome LIKE '%" & nome &"%' or convenios LIKE '%" & convenios &"%' " 
end if

if medico.EOF Then
       response.write("Nenhum dado foi encontrado")
       medico.close 
       set medico=nothing 
       conexao.close 
       set conexao=nothing
else
while not (medico.eof)
  if medico.fields("nome") <>"" then
     response.write "Nome do Medico:" & medico.fields("nome")%><br><%
  end if
  if medico.fields("convenios") <>"" then
     response.write "Convenios:" & medico.fields("convenios")%><br><br><%
  end if
medico.movenext
wend
end if

Conexao.close
Set Conexao = nothing

%>

[adriano182 0]

Cara, valeu mesmo... consegui descobrir o erro com a ajuda de um cara.Eu tava escrevendo :'%" & convneios &"%' em vez de '%" & convenios &"%' agora ta funcionando!Adriano