|
Hi,
one of the ways to do it is:
(assuming that you've already opened the recordset based on the table you want to add records to (rs2) and the recordset
containing the records to be attached (rs1)
rs1.MoveFirst
Private Sub Command1_Click
Do Until rs1.EOF
rs2.AddNew
rs2.Fields(i)=rs1Fields(i)
.....
.....
rs2.Update
rs1.MoveNext
Loop
End Sub
Regards,
Shurik12.
|
__________________
"A diaper is not like a computer that makes satisfying burbling noises from time to time, hinting at great inner complexity." Malcolm Gladwell
"I'm sitting here completely surrounded by no beer." Onslow, 'Keeping up appearances'
|