Runtime Error- 3192, Could not find output table. INSERT INTO

[pedie]

Hi, 'm recieving this error when i try to select all data from
Budget_INFO in different datatbase into Budget_INFO in this databse.

Please advice, 'm i useful some illegal statement here
Thanks


Sub InsertIntoX1()
Dim dbs As Database
Dim rst As DAO.Recordset
Set dbs = OpenDatabase("E:\Personal_Files\Access\Database4.accdb")
Set rst = CurrentDb.OpenRecordset("Budget_INFO", dbOpenDynaset)

dbs.Execute " INSERT INTO Budget_INFO1 " _
& "SELECT * " _
& "FROM [Budget_INFO];"

dbs.Close
End Sub

 

[xenou]

The table in the external database has to be linked in the database where you run the execute command (so it can be "seen" just like a local table). Your attempt to open a recordset does nothing I'm afraid - it has nothing to do with the Execute command you want to run.

 

[pedie]

Okay Xen, i have no idea what I was doing...I just looked at the exmaple and tried to make it work for me, but didnt
And yes, the table is not linked to other database...

So Xen, my same question still continous...
So how can i transfer all the data into my table from the table in different database without looping but by using some SQL maybe and copy bulk info into my table in current database?

Thanks again.

 

[xenou]

Try:

[COLOR="Blue"]INSERT INTO [/COLOR]Table1 [COLOR="Blue"]IN [/COLOR]'C:\SomeFolder\SomeDatabase.mdb'
    ( Field1, Field2, Field3 )

[COLOR="Blue"]SELECT [/COLOR]
    Table2.Field1, Table2.Field2, Table2.Field3

[COLOR="Blue"]FROM [/COLOR]
    Table 2;

It's not normal to have to use this kind of remote query very often. Consider if this could be done more simply by just linking your tables.

 

[Norie]

Why not, without code, create a link to or import this table into the database?