MartyConnelly
martyconnelly at shaw.ca
Tue Sep 16 23:47:30 CDT 2003
You can do this; from IN and INTO help files
The following example makes a copy of the Employees table and places the
new table in the assumed database Backup.mdb:
SELECT Employees.* INTO Employees IN Backup.mdb FROM Employees;
or
Sub SelectIntoX()
Dim dbs As Database
Dim qdf As QueryDef
' Modify this line to include the path to Northwind
' on your computer.
Set dbs = OpenDatabase("Northwind.mdb")
' Select all records in the Employees table
' and copy them into a new table, Emp Backup.
dbs.Execute "SELECT Employees.* INTO " _
& "[Emp Backup] FROM Employees;"
' Delete the table because this is a demonstration.
dbs.Execute "DROP TABLE [Emp Backup];"
dbs.Close
End Sub
Arthur Fuller wrote:
> I know that you can do SELECTs from multiple MDBs in a single SELECT
> statement. I never tried an append query across MDBs but I think it
> would work.
>
> A.
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Rocky
> Smolin - Beach Access Software
> Sent: Tuesday, September 16, 2003 7:55 AM
> To: AccessD at databaseadvisors.com
> Subject: [AccessD] Trasnfer Table Between Databases
>
> Dear List:
>
> I have a FE/BE app where I need to transfer three of the BE tables
> to another database. Is there a better way to do this than
> creating a workspace for the target database, opening the
> target, opening the source and object tables and transferring the
> records one by one. The table structure in the source and target
> databases is the same. The number of records is small. So time
> is not a consideration.
>
> MTIA
>
> Rocky Smolin
> Beach Access Software
>
>
>------------------------------------------------------------------------
>
>_______________________________________________
>AccessD mailing list
>AccessD at databaseadvisors.com
>http://databaseadvisors.com/mailman/listinfo/accessd
>Website: http://www.databaseadvisors.com
>
>