[Resolvido] Consultar em uma Tabela e Gravar em outra

[João Masiero 0]

Gente eu to tentando busca ums dados em uma tabela mas eu preciso que os dados buscados nesta tabela sejam gravados em outroa, alem disto alguns dados são retomados de um formulario anterior,

Eu tentei usar insert com select mas não consegui então tentei usar select e depois insert mas ta dando erro o codigo e o erro estão a baixo

 

<%

data = date()
codigo= request.Form("cod")
pedido = 1
nome = response.Write("nome")
quantidade = request.Form("qtd")
valor = response.Write ("valor")


constr=server.mappath("bd1.mdb")
banco="dbq="&constr&";driver={microsoft access driver (*.mdb)}"
set conexao=server.createobject("adodb.connection")
conexao.open banco


sql = ("SELECT * FROM produtos WHERE cod_loja =('"& codigo &"')")
set rs = conexao.execute(sql)
sql1 = ("INSERT INTO admin (data, cod_loja, pedido, nome, quantidade, valor) VALUES ("&data&", "&codigo&", "&pedido&", "&nome&", "&quantidade&", "&valor&"")
set rs1 = conexao.execute(sql1)

%>

Tipo de erro:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

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

/insereproduto.asp, line 20

 

 

[Ted k' 126]

tente assim:

 

conexao.execute("INSERT INTO admin (data, cod_loja, pedido, nome, quantidade, valor) VALUES ('"&data&"', '"&codigo&"', '"&pedido&"', '"&nome&"', '"&quantidade&"', '"&valor&"')")

[xanburzum 169]

Verifique a ortografia, veja se não tem nenhum nome de coluna invalido ,ou se a coluna a qual você se refere na Base de Dados não foi encontrada. E poste o conteúdo do arquivo conecta.asp

E dê um response.write na sua instrução SQL, para ver o que esta sendo passado

[João Masiero 0]

cara todas as colunas estão certas o response write funciona certinho so num ta inserindo os dados eu fiz igual o ted falou mas num foi tb! alguem tem mais alguma sugestão?

[xanburzum 169]

ele gera algum outro erro, o k ele passa no response.write, veja tb as permissoes no banco ara gravacao.

[João Masiero 0]

então num gera não, eu gerei duas text field e mandei da um response write e veio certinho, o banco ta com permição pq eu gravo dados em outra pagina e ela ta normal! tem algum jeito de transmiti dados de um form sem passa pra outra pagina?

[xanburzum 169]

você pode fazer isso atraves de sessions...

[João Masiero 0]

voce podeira me falar mais ou menos como faço isso? comecei meu curso de programação web a 1 ano e ainda não vi essa parte de session

[hargon 64]

Acima da linha

set rs1 = conexao.execute(sql1)

Coloque:

Response.Write sql1
Response.End

Poste o resultado.

[regitronic 0]

Consegui resolverr galera vlwsss

[xanburzum 169]

beleza, kker coisa posta ae..