Busca detalhada com vários campos

[Felipe Delgado 0]

MARIAO,

 

Deu, mas eu tive que tirar um troço que o AAlves tinha falado:

 

if (right(auxsql,6) = "WHERE ") then

auxsql = "SELECT * FROM listamaquinas ORDER BY DIAMETRO DESC, FINURA DESC, PRECO DESC, ANO DESC"

else

auxsql = left(auxsql,len(auxsql) - 4) & "ORDER BY DIAMETRO DESC, FINURA DESC, PRECO DESC, ANO DESC"

end if

 

 

Entao, perdi o ORDER BY,

 

como colocar isso no novo código que está funcando agora, porém com este WHERE 1 = 1.

 

 

<%

auxsql = "SELECT * FROM listamaquinas WHERE 1 = 1"

if (request.QueryString("tipomaq") <> "Todas") then

auxsql = auxsql & " AND TIPO LIKE '" & request.QueryString("tipomaq") & "'"

ELSE

auxsql = auxsql & " AND (TIPO LIKE 'Mono%' OR TIPO LIKE 'Dupla%' AND TIPO NOT LIKE 'FORA%')"

end if

if (request.QueryString("fabricante") <> "Todos") then

auxsql = auxsql & " AND FABRICANTE LIKE '" & request.QueryString("fabricante") & "'"

end if

if (request.QueryString("modelo") <> "") then

auxsql = auxsql & " AND MODELO LIKE '%" & replace(request.QueryString("modelo"),"'", "''") & "%'"

end if

if (request.QueryString("diametro") <> "Todos") then

auxsql = auxsql & " AND DIAMETRO = '" & request.QueryString("diametro") & "'"

end if

if (request.QueryString("finura") <> "Todas") then

auxsql = auxsql & " AND FINURA = '" & request.QueryString("finura") & "'"

end if

if (request.QueryString("alimentadores") <> "Todos") then

auxsql = auxsql & " AND ALIMENTADORES = '" & request.QueryString("alimentadores") & "'"

end if

if (request.QueryString("status") <> "Todas") then

auxsql = auxsql & " AND COMPRAOUVENDE = '" & request.QueryString("status") & "' AND "

end if

[Mário Monteiro 179]

poe depois de tudo o order by

[Felipe Delgado 0]

Alrite, deu certo:auxsql = auxsql & " ORDER BY DIAMETRO DESC, FINURA DESC, FABRICANTE ASC, MODELO ASC"

[Mário Monteiro 179]

boaparabens ai tiozinho