Qualé o problema?

[brunocampos 0]

Pessoal o meu servidor está retornando um erro que não confere. O código abaixo serve para inserir um produto na tabela "Carrinho" do meu BD:

 

Dim SQL, RS, Quantidade, CodProduto, CodCliente, Preco

 

if Request.Form("comprando") = "sim" then

'Armazena os valores passados pelo método POST em variáveis

Quantidade = int(Request.Form("Quantidade"))

CodProduto = int(Request.Form("CodProduto"))

Preco = Request.Form("Preco")

'Busca o código do cliente que está armazenado em uma Session

CodCliente = int(Session("cod_cliente"))

 

SQL = "SELECT * From Produtos WHERE cod_produto = " & CodProduto

Set RS = conexao.execute(SQL)

 

if Quantidade = 0 then

response.Write("Meu amigo, quantas pizzas você quer?")

else

SQL = "INSERT INTO Carrinho(codproduto, codcliente, quantidade, preco) VALUES (" & codproduto & "," & codcliente & "," & quantidade & "," & preco & ")"

conexao.execute(SQL) Response.Redirect("comprados.asp")

end if

else

Dim cod

cod = int(Request.QueryString("cod_produto"))

SQL = "SELECT * FROM Produtos, Categorias WHERE Produtos.cod_categoria = Categorias.cod_categoria AND cod_produto = " & cod

Set RS = conexao.execute(SQL)

%>

 

 

Retorna o seguinte erro:

 

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

 

[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe na instrução INSERT INTO.

 

/lagondola/sacola.asp, line 144

 

O texto que está em negrito logo acima é a linha 144 do meu código, o que estou fazendo de errado aqui? Alguém pode me explicar?

 

Obrigado!

Bruno Campos

[Brito 0]

Bem amigo, não deu pra olhar com muita atenção que tenho que sair agorinha mas... vou dar um chute.O valores na parte "VALUES" da instrução SQL não deveriam estar entre "Aspas simples"? tipo assim:VALUES('1', '4', '7')Experimenta concatenar la para ver no que da.Falou...

[W.Silva 0]

Então brunocampos Como você optou por adicionar o Request a uma Variavel (Quantidade = int(Request.Form("Quantidade"))) Sua instrução SQL para inclusão de dados dever ser a seguinte.SQL= "INSERT INTO Carrinho ('"& suavariavel &"', '"& suavariavel2 &"');"Um Abraço W.Silva