Fim da instrução esperado

[Fabio Rodrigo 0]

<%	SQL = "Select * from tbl_carros" 	select case sorder	case "1" 	SQL = SQL &  " where status like "Ativo""	case "2"	SQL = SQL &  " where status like "Não Ativo""	case "3"	SQL = SQL &  " order by "codigo_montadora""	case "2"	SQL = SQL &  " order by "modelo""	end select	Set rs_veiculos = Server.CreateObject("ADODB.Recordset")	rs_veiculos.open SQL, conexao,1,1	%>

Toda e qualquer instrução que eu jogar no fomulario da esse erro

Erro de compilação do Microsoft VBScript (0x800A0401)

Fim da instrução esperado

/projetos/L/Lokamig/administrador/lstveiculos.asp, line 160, column 35

SQL = SQL & " where status like "Ativo"""

conforme o cara clicar em um radio button ele vai mudando de instrução..

Se alguém ja passou por isso e puder me ajudar agradeço....

[jothaz 1]

Camarada,

 

Qual o bd você esta utilizando?

 

Bom tenta algo assim:

SQL = "Select * from tbl_carros"

select case sorder	case "1"		SQL = SQL & " where status like '%Ativo%'"	case "2"		SQL = SQL & " where status like '%Não Ativo%'"	case "3"		SQL = SQL & " order by codigo_montadora"	case "2"		SQL = SQL & " order by modelo"end select

t+

[jrcardozo 4]

amigo, como não sabemos exatamente como montou seu script, o que é variavel e o que não é, então fiz assim, veja se modelo e codigo_montadora são variaveis, se for o codigo está "correto" descrevo abaixo, caso não seja informe o que é string fixa para arrumarmos

 

<%	SQL = "Select * from tbl_carros" 	select case sorder	case "1" 	SQL = SQL &  " where status like Ativo"	case "2"	SQL = SQL &  " where status like Não Ativo"	case "3"	SQL = SQL &  " order by "&codigo_montadora&""	case "2"	SQL = SQL &  " order by "&modelo&""	end select	Set rs_veiculos = Server.CreateObject("ADODB.Recordset")	rs_veiculos.open SQL, conexao,1,1	%>

[jothaz 1]

Camarada,

 

Vou fechar este post pois foi aberto outro com o mesmo conteúdo.

 

Podemos acompanhar a dicussão neste post

.

 

t+