Ir para conteúdo

POWERED BY:

Arquivado

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

rubenssoto2005

[Resolvido] problema com busca

Recommended Posts

ae pessoal ja tentei fazer busca de diversas maneiras

 

eu tenho 6 tabelas... ao inves de consultar as 6 de uma so vez resolvi fazer assim pra ficar mais simples e pratico

na pagina da busca tem um select onde o kra seleciona aonde ele qr buscar... e esse aonde vai ser a tabela

 

deem uma olhada nos codigos

 

buscar.htm

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /><title>Untitled Document</title></head><body><form id="form1" name="form1" method="post" action="busca.asp">  <table width="239" border="0">	<tr>	  <td width="49"><strong>Busca:</strong></td>	  <td width="174"><label>		<input name="busca" type="text" id="busca" />	  </label></td>	</tr>	<tr>	  <td colspan="2"><label>		<select name="categorias" id="categorias">		  <option selected="selected">utilitarios</option>		  <option>antivirus</option>		  <option>imagem</option>		  <option>mp3</option>		  <option>rede</option>		  <option>video</option>		</select>	  </label></td>	</tr>	<tr>	  <td colspan="2"><label>		<div align="center">		  <input type="submit" name="Submit" value="Buscar" />		  </div>	  </label></td>	</tr>  </table></form></body></html>

busca.asp

 

<!--#include file = "conexao.asp"--><%categorias = Request.Form("categorias")busca = Request.Form("busca")Set RS = Server.CreateObject("ADODB.Recordset")SQL = "Select * From '"&categorias&"' where nome='"& busca &"'"RS.Open SQL, conexao,1,1IF RS.BOF then   Response.Write "Nenhum registro encontrado"   Response.End 'paramos o programaELSEEnd if  %><table width="200" border="0"><% while not RS.EOF %>  <tr>	<td><%=RS("nome")%></td>  </tr>  <%RS.movenextwend%></table>

alguem me ajuda porfavor??

 

o erro e esse

 

HTTP 500 - erro interno do servidor

Compartilhar este post


Link para o post
Compartilhar em outros sites

ae amigo funcionou mas ele sempre diz que nao existe registro ou seja ele sempre diz que nao encontrou

 

agora fico assim

 

<!--#include file = "conexao.asp"--><%categorias = Request.Form("categorias")busca = Request.Form("busca")Set RS = Server.CreateObject("ADODB.Recordset")SQL = "Select * From "&categorias&" where nome='"& busca &"'"RS.Open SQL, conexao,1,1IF RS.BOF then   Response.Write "Nenhum registro encontrado"   Response.End 'paramos o programaELSEEnd if  %><table width="200" border="0"><% while not RS.EOF %>  <tr>	<td><%=RS("nome")%></td>  </tr>  <%RS.movenextwend%></table>

Compartilhar este post


Link para o post
Compartilhar em outros sites

substituaSQL = "Select * From "&categorias&" where nome='"& busca &"'"paraSQL = "Select * From "&categorias&" where nome like '%"& busca &"%'" 'like significa parecido.... % frase = qualquer caracter ou texto na frente e frase...frase% = frase mais qualquer caracter ou texto....%frase% qualquer texto que contenha a palavra frase

Compartilhar este post


Link para o post
Compartilhar em outros sites

kra qria te agradecer vlw ae deu tudo certo

pra quem quiser o codigo fico assim

 

<!--#include file = "conexao.asp"--><%categorias = Request.Form("categorias")busca = Request.Form("busca")Set RS = Server.CreateObject("ADODB.Recordset")SQL = "Select * From "&categorias&" where nome like '%"& busca &"%'" 'RS.Open SQL, conexao,1,1IF RS.BOF then   Response.Write "Nenhum registro encontrado"   Response.End 'paramos o programaELSEEnd if  %><table width="200" border="0"><% while not RS.EOF %>  <tr>	<td><a href="<%=categorias%>detalhe.asp?id=<%=rs("id")%>"><%=RS("nome")%></a></td>  </tr>  <%RS.movenextwend%></table>

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.