[Resolvido] Exibindo todos os Campos do DB

[pacero 0]

tenho uma busca mais ela so lista o nome do produto que foi buscado. no banco de dados existe os campos: nome, codigo, preço... gostaria q todos os campos relacionado ao produto aparecessem. abaixo segue o codigo q busca e imprime apenas o nome.

 

 

 

 

<%

Busca = Trim(Request.form("buscando"))

%>

 

 

<%

set DB = createobject("adodb.connection")

constr = "Driver={Microsoft Access Driver (*.mdb)};DBQ="&Server.Mappath("banco.mdb")

DB.open constr

 

Set objRS = Server.CreateObject("ADODB.Recordset")

%>

 

 

<%

function TiraAspas(str)

str = replace(str,"'","""")

TiraAspas = str

End function

%>

 

 

 

<%

Busca=TiraAspas(Busca)

 

strSql = "SELECT * FROM cadastro WHERE nome LIKE '%"&Busca&"%'"

objRS.Open strSQL,DB,1,1

%>

 

Resultado da busca<br>

 

 

<%

if (len(busca)<=2) then

Response.write("Digite uma palavra com o mínimo de 3 letras para fazer a busca.")

 

ElseIf (Busca = "") then

Response.write("Você precisa escrever uma palavra para fazer uma busca.")

 

ElseIf (objRS.EOF = true) then

response.write "Sua busca por <b>"&Busca&"</b> não retornou nenhum resultado, por favor tente ser menos específico."

Else

do While not objRS.EOF

%>

<%=objRS(TiraAspas("nome"))%><br>

<%

objRS.MoveNext

Loop

End IF

%>

[Mário Monteiro 179]

so acrescentar a exibição dos campos dentro do loop

 

assim como fez com o nome

 

ASP

<%=objRS(TiraAspas("nome"))%><br>

[Luizgrs 0]

Para acessar os campos retornados de uma consulta em um recordset você faz:

ASP

objRS("nome_do_campo")

objRS é sempre a variável recordset.

 

Outra coisa, aquela função ali TiraAspas está na posição errada não?

 

ps.: quando entrei ainda não tinha o post do mario xD

[Mário Monteiro 179]

esta na posição errada a função mesmo

 

mas se ela so fizer a retirada das aspas nao dará erro pois o nome do campo nao tem aspas

[pacero 0]

obrigado ae galera.

 

100%

[Mário Monteiro 179]

Tranquilo tiozinho