ADO question

G

Gez

Is there an easy way of appending one ADO table saved as a recordset file to
another saved within the access DB using SQL e.g.

Dim conn1 As ADODB.Connection
Dim conn2 As ADODB.Connection

Dim rst1 As ADODB.Recordset
Dim rst2 As ADODB.Recordset

If importDialog = False Then Exit Function ' gets the rs file name and path
and saves to global called strfilename

Set conn1 = New ADODB.Connection
conn1 = CurrentProject.Connection

Set conn2 = New ADODB.Connection
With conn2
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "data source=" & strfilename
.Mode = adModeReadWrite
End With

strsql = "Insert Into ADOTable1 Select * from ADOTable2" < -- this is the
bit I'm stuck on!

Thanks,

Geraint
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top