[Resolvido] Busca

[betobto 0]

Este códifo é para busca.....

 

você pode fazer a busca por nome colocando a categoria ea marca, somente por nome e/ou categoria e/ou marca

 

Olá pessoal penei pra fazer isso mas o Ted k' me deu uma ajuda....... VLW ted.....

 

estou postando a vocês o codigo

 

 

FORM.asp

<form action="default.asp?pag=buscar#topo" method="post" name="formulario">
<strong>Nome do PRODUTO </strong>
<input type="text" name="nomeproduto" style="width:188px; height:20px; padding-left:2px;" />

<select name="txtcategoria" class="adminInput" style="width: 190px;">
<option value="">CATEGORIA</option>
<% wsql = "SELECT * FROM tabcategorias ORDER BY categoria_nome"
		  SET wrs = wcon.EXECUTE(wsql)
		  DO WHILE NOT wrs.EOF	  %>
<option value="<%=wrs("categoria_id")%>"><%=wrs("categoria_nome")%></option>
<% wrs.MOVENEXT
LOOP %>
</select>

<select name="txtmarca" class="adminInput" style="width: 190px;">
<option value="">MARCA</option>
<% wsql = "SELECT * FROM tabmarcas ORDER BY marca_nome"
		  SET wrs = wcon.EXECUTE(wsql)
 		  DO WHILE NOT wrs.EOF %>
<option value="<%=wrs("marca_id")%>"><%=wrs("marca_nome")%></option>
<% wrs.MOVENEXT
LOOP %>
</select>
<input type="image" src="images/btn_buscar.gif" name="Submit" value="buscar" />
</form>

busca.asp

 

<%
wNome = Request.form("nomeproduto")
wCategoria = Request.form("txtcategoria")
wMarca = Request.form("txtmarca")

SQL = SQL & "SELECT * FROM tabprodutos WHERE Produto_Id > 0 "
If wNome <> "" Then
	SQL = SQL & "AND Produto_Nome LIKE '%"&wNome&"%' AND Produto_Descricao LIKE '%"&wNome&"%'"
End If
If wMarca <> "" Then
	SQL = SQL & "AND Marca_Id = "&wMarca&""
End If
If wCategoria <> "" Then
	SQL = SQL & "AND Categoria_Id = "&wCategoria&""
End If
SQL = SQL & " Order By Produto_Nome ASC"
Set wrs = wcon.Execute(SQL)
%>