Accodamento/copia tabella2 in tabella1 in access vba

giovedì 20 marzo 2014 - 07.00
Tag Elenco Tags  Access (.mdb)

leoobelix Profilo | Newbie

codice :

Dim rs1 As DAO.Recordset
Dim rs2 As DAO.Recordset
Set rs1 = CurrentDb.OpenRecordset("tabella1")
Set rs2 = CurrentDb.OpenRecordset("tabella2")

Do until .....( qui non so .... )

rs1.AddNew
rs1("prodotto") = rs2("prodotto")
rs1.Update
rs2.MoveNext
Loop


'chiude gli oggetti
rs1.Close
rs2.Close
Set rs1 = Nothing
Set rs2 = Nothing


non voglio usare la query , sto cercando di farlo con il record set .
questione : Il ciclo loop DO until .. cosa gli dico ????

devo copiare la tabella2 in tabella1 ( stessa struttura ) ma in accodamento
(quindi devo sempre aggiungere tutti i dati in coda alla fine )


grazie

alx_81 Profilo | Guru

ciao

>non voglio usare la query , sto cercando di farlo con il record set .
>questione : Il ciclo loop DO until .. cosa gli dico ????
Do Until rs1.EOF
è questo che intendi?

>grazie
di nulla!
Alessandro Alpi | SQL Server MVP
MCP|MCITP|MCTS|MCT

http://blogs.dotnethell.it/suxstellino
http://suxstellino.wordpress.com
http://mvp.microsoft.com/profiles/Alessandro.Alpi

leoobelix Profilo | Newbie

PERFETTO grazie !
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2025
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5