ajetrumpet, are you referring to this?
apologies...
actually i want to transfer data all together like insert into this table from that database table.
I tried the insert statement given in help but wont work for me cox, idont know hwo to make it work.
Code:
Sub test333_1()
Dim db As dao.Database
Dim rs As dao.Recordset
Set db = OpenDatabase("E:\Personal_Files\Access\MAINDB.accdb", False, False, "MS Access;PWD=password")
Set rs = db.OpenRecordset("BTLog")
rs.MoveFirst
While Not rs.EOF
Debug.Print rs.Fields(1)
rs.MoveNext
Wend
rs.Close
db.Close
rs.Close
db.Close
End Sub