Bom dia Pessoal estou com um probleminha aqui, tenho uma tabela de itens referente as notas fiscais e preciso jogar esse itens em outra tabela porem na outra tem um campo do "Numero do Item" que precisa ser numerado e que não tem na tabela de origem, ou seja preciso numera-los de acordo com cada nota (1,2,3,4,5,6.....) estou tentando assim:
(Tabela Origem = ItensNota, Tabela Destino = Itens Mercadorias)
SQL = "Select * From ItensNota "
Recordset_1.Open SQL, Conexao_1, adOpenStatic
Do Until Recordset_1.EOF
SQLProd = "Select * From CadastroProdutos WHERE CÓDIGO = '" & Recordset_1(2) & "'"
Recordset_2.Open SQLProd, Conexao, adOpenStatic
ItNF = "SELECT ROW_NUMBER()OVER(ORDER BY NUM_NOTA)AS NUM_ITEM FROM ItensNota WHERE NUM_NOTA='" & Recordset_1(1) & "'"
Recordset_3.Open ItNF, Conexao_1, adOpenStatic
Do Until Recordset_3.EOF
SQLItens = " INSERT INTO [ITENS MERCADORIAS] ([Número da Nota Fiscal],[Item],[Descrição]) VALUES('" & (Recordset_1(1), "0000000") & "','" & Recordset_3!NUM_ITEM & "','" & Recordset2(2) & "')"
Recordset_1.MoveNext
Recordset_3.MoveNext
Loop
Recordset_3.Close
Recordset_2.Close
Recordset.Open SQLItens, Conexao, adOpenStatic
Loop
Recordset_1.Close
Numerando até que tá, só que ta gravando na tabela nova só o ultimo registro de cada consulta, e não um a um.
