Erro em consulta

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%>