cariki tutti i dati di sql dentro un dataset
et voila'.codice:'prima fai tutti il tuo codice per caricare i record dentro dataset 'una volta fatto fai così Dim Datarow as DataRow for each datarow in dataset.tables("tabella").rows 'codice per inserire dentro access Next
io ho fatto questo lavoro 2 volte..
una da xml ad access
la seconda da excel ad access