Copy a table from another database into current database

[cowboy]

How do I copy a table from another database into my current database?


I tried this but it deletes my data in rstWin even though I made a clone, I guess the clone function doesnt make a copy of the recordset.

            Dim dbWin As DAO.Database
            Dim rstWin As DAO.Recordset
            Dim rstClone As DAO.Recordset

            
            Set dbWin = OpenDatabase(strInputFileName)
            Set rstWin = dbWin.OpenRecordset("S_T")
            Set rstClone = rstWin.Clone
            
            rstWin.Close
            Set rstWin = Nothing

            
            'current database
            Dim cdb As DAO.Database
            Dim crst As DAO.Recordset

            Set cdb = CurrentDb()
            Set crst = cdb.OpenRecordset("Pipes")

            rstClone.MoveFirst
            
            If crst.RecordCount > 0 Then
                Do While Not rstClone.EOF
                    crst.MoveFirst
                    Do While Not crst.EOF
                        If crst![SegID] = rstClone!S_LocDetails Then
                            crst.Edit
                            
                            If IsNull(rstClone!S_Street) = False Then
                                crst!Street = rstClone!S_Street
                            End If
                            
                            rstClone.Edit
                            rstClone.Delete
    
                            crst.Update
                        End If
                        crst.MoveNext
                    Loop
                    rstClone.MoveNext
                Loop
            End If
            
            rstClone.MoveFirst

any help is appreciated thanks

[maximus]

well if you need to copy a table from a database to the current database you can try TransferDatabase Method:

DoCmd.TransferDatabase acImport, "Microsoft Access", "c:\test.mdb", acTable, "Table1", "MyTable", False

I have used this to import Table1 from a Database test.mdb in my C:\ drive and save the same in my Current Database as MyTable

[cowboy]

Ok, it copied over the table I wanted correctly but it also created a table, I have attached a picture of it. What does it mean?

[maximus]

I think this link will adequately explain the problem:
Please mark the thread solved as I believe you can now able to to do what u wanted.

http://office.microsoft.com/en-ca/ac...005257523.aspx

[cowboy]

Ok, now I understand a little more about Name AutoCorrect, but why would it want to autocorrect this table name? There is no relationship to it and I told it what the new name should be.