Inserir Variavel em Query

[sasleal 0]

Criei a variavel:

 

Varcodigo_correlacao = RS_Produtos("codigo_correlacao")

e inserir na query:

 

Query_produtos = "SELECT Produtos.codigo_produto, Produtos.codigo_produto, Produtos.codigo_categoria, Produtos.codigo_subcategoria, Produtos.codigo_marca, Produtos.codigo_produto_loja, Produtos.nome_produto, Produtos.descricao_produto, Produtos.autor, Produtos.codigo_isbn, Produtos.tamanhos, Produtos.cores, Produtos.preco_base, Produtos.preco_unitario, Produtos.desconto, Produtos.moeda, Produtos.quantidade_produto, Produtos.img_produtoPQN, Produtos.img_produtoGRD, Produtos.img_produto_adic01PQN, Produtos.img_produto_adic01GRD, Produtos.img_produto_adic02PQN, Produtos.img_produto_adic02GRD, Produtos.img_produto_adic03PQN, Produtos.img_produto_adic03GRD, Produtos.peso, Produtos.destaque_vitrine, Produtos.promocao, Produtos.data_inicio, Produtos.data_fim, Produtos.disponivel,  Produtos.sigla_idioma FROM Categorias INNER JOIN Produtos ON Categorias.codigo_categoria = Produtos.codigo_categoria WHERE Produtos.codigo_produto = Varcodigo_correlacao AND Produtos.sigla_idioma = '"&varLang&"' AND Categorias.sigla_idioma = '"&varLang&"' " & queryORDERBY")

Porém está apresentando erro, gostaria de saber onde esta o erro.

 

Que puder me ajudar agradeço....

[jrcardozo 4]

amigo, quando postar sempre coloque detalhes do erro para sabermos exatamente o que está ocorrendo, porém verifiquei que seu sql está errado, no final falta & e sobra ) , ficando assim, tente:

Query_produtos = "SELECT Produtos.codigo_produto, Produtos.codigo_produto, Produtos.codigo_categoria, Produtos.codigo_subcategoria, Produtos.codigo_marca, Produtos.codigo_produto_loja, Produtos.nome_produto, Produtos.descricao_produto, Produtos.autor, Produtos.codigo_isbn, Produtos.tamanhos, Produtos.cores, Produtos.preco_base, Produtos.preco_unitario, Produtos.desconto, Produtos.moeda, Produtos.quantidade_produto, Produtos.img_produtoPQN, Produtos.img_produtoGRD, Produtos.img_produto_adic01PQN, Produtos.img_produto_adic01GRD, Produtos.img_produto_adic02PQN, Produtos.img_produto_adic02GRD, Produtos.img_produto_adic03PQN, Produtos.img_produto_adic03GRD, Produtos.peso, Produtos.destaque_vitrine, Produtos.promocao, Produtos.data_inicio, Produtos.data_fim, Produtos.disponivel,  Produtos.sigla_idioma FROM Categorias INNER JOIN Produtos ON Categorias.codigo_categoria = Produtos.codigo_categoria WHERE Produtos.codigo_produto = Varcodigo_correlacao AND Produtos.sigla_idioma = '"&varLang&"' AND Categorias.sigla_idioma = '"&varLang&"' " & queryORDERBY&"

[sasleal 0]

O erro apresentado é

 

 

Microsoft VBScript runtime error '800a000d'

 

Type mismatch: 'RS_Produtos'

 

/ecommerce/funcoes/funcoes.asp, line 1296

 

 

 

e esta na linha da variavel.

 

Varcodigo_correlacao = RS_Produtos("codigo_correlacao")

[jrcardozo 4]

verifique se tem algum valor dentro do recordset antes de seguir com o código, e no seu sql tem outra coisa a mudar

de:

WHERE Produtos.codigo_produto = Varcodigo_correlacao

para

WHERE Produtos.codigo_produto = "&Varcodigo_correlacao&"