filtra os dados

[frankikos 0]

Bom dia galera.....mais uma dúvida.

Tenho um bd com a tabela:

Carros

ID

Marcas

Carro

Foto

Detalhes

Preço

Em carros eu tenho os cadastros (fiat, chevrolet, ford, etc)

Como faço para exibir por exemplo em uma nova página, todos os registros "fiat" ???

Como fica minha sql, pois a minha está assim, e não resolve:

Código

Dim strConn, oConn, oRS, strSQLstrConn = "Driver={Driver do Microsoft Access (*.mdb)}; DBQ=" & Server.MapPath("carros.mdb")Set oConn = Server.CreateObject("ADODB.Connection")Set oRS = Server.CreateObject("ADODB.RecordSet")strSQL = "SELECT * FROM Carros WHERE Carro LIKE 'Chevrolet%'ORDER BY Carro"

Se alguem puder me ajudar... fico grato

[Felipe Bellé 0]

Bom dia galera.....mais uma dúvida.

Tenho um bd com a tabela:

Carros

ID

Marcas

Carro

Foto

Detalhes

Preço

Em carros eu tenho os cadastros (fiat, chevrolet, ford, etc)

Como faço para exibir por exemplo em uma nova página, todos os registros "fiat" ???

Como fica minha sql, pois a minha está assim, e não resolve:

Código

Dim strConn, oConn, oRS, strSQLstrConn = "Driver={Driver do Microsoft Access (*.mdb)}; DBQ=" & Server.MapPath("carros.mdb")Set oConn = Server.CreateObject("ADODB.Connection")Set oRS = Server.CreateObject("ADODB.RecordSet")strSQL = "SELECT * FROM Carros WHERE Carro LIKE 'Chevrolet%'ORDER BY Carro"

Se alguem puder me ajudar... fico grato

chevrolet não é marca?

[frankikos 0]

Pior que é....................mas assim, as marcas são numeros tipo - chevrolet=4...como listar então!???

[frankikos 0]

Galera.....mudei o meu bd e consegui filtrar...................mas tem um porem, só aparece um registro!!

Tipo:

strConn = "Driver={Driver do Microsoft Access (*.mdb)}; DBQ=" & Server.MapPath("carros.mdb")Set oConn = Server.CreateObject("ADODB.Connection")Set oRS = Server.CreateObject("ADODB.RecordSet")strSQL = "SELECT * FROM Carros WHERE Marca Like'%Chevrolet%'"oRS.Open strSQL, strConnResponse.Write "<table border=1>"Response.Write "<tr>"Response.Write "<td>" & oRS("Marca") & "</td></tr>"Response.Write "<tr><td>" & oRS("Carro") & "</td>"Response.Write "<td><img src=" & oRS("Foto")& "></td>"Response.Write "<td>" & oRS("Detalhes") & "</td>"Response.Write "<td>" & oRS("Preco") & "</td>"Response.Write "</tr>"Response.Write "</table>"

E ai galera....como faço pra mostrar todos os registros CHEVROLET?????

 

ATÉ+

[jrcardozo 4]

você tem que mover o recordset

 

 

oRS.Open strSQL, strConndo while not oRS.eofResponse.Write (oRS("Marca") )oRS.movenextloop

[frankikos 0]

você tem que mover o recordset

oRS.Open strSQL, strConndo while not oRS.eofResponse.Write (oRS("Marca") )oRS.movenextloop

É por isso que eu Amo este fórum!!!!Mais uma vez obrigado!!!Olha eu abusando.Por exemplo, se eu~não tenho a foto, mas tenho uma imagem "imagemnãodisponivel.jpg" - como faço para chamar essa imagem, caso não tenha a foto do produto??Até+Abraços e obrigado de novo!!

[jrcardozo 4]

só fazer um IFoRS.Open strSQL, strConndo while not oRS.eofResponse.Write (oRS("Marca") )response.write("<br>")if trim(oRS("foto")) ="" thenResponse.Write ("<img src="pastaFotos/imagemnãodisponivel.jpg>")elseResponse.Write ("<img src=""pasta"&oRS("foto")&""">" )end ifoRS.movenextloop

[frankikos 0]

Muito obrigado Jonathan