Tenho uma tabela com o nome produtos e uma com o nome pedidos.
Tenho uma pagina na qual o vendedor digita o codigo e a quantidade, então o sistema a partir do codigo digitado pelo vendedor tem de buscar o nome e o valor do produto na tabela produtos e inserir estes dados (codigo, nome, quantidade e valor) na tabela pedidos.
Tentei fazer assim mas não deu
<%
tabela = request.form("vend")
cliente = request.form("cod")
produto = request.form("prod")
quantidade = request.form("qtd")
data = day(now)/month(now)/year(now)
nome = ("select nome FROM produtos WHERE codigo='"&produto&"'")
valor = ("select valor FROM produtos WHERE codigo='"&produto&"'")
set conexao = createobject("AdoDb.connection")
constr = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& server.MapPath("bd1.mdb")
conexao.open constr
set rs = conexao.execute("insert into pedidos (data, cod_loja, pedido, nome, quantidade, valor) values ("&data&", "&produto&", 1, "&nome&", "&quantidade&", "&valor&"")
%>
