# Re: 请问有没有办法把Database的Table内的资料存入一个Database呢?

Posted by Chen on August 05, 1998 at 15:45:29:

In Reply to: 请问有没有办法把Database的Table内的资料存入一个Database呢? posted by 丸子 on August 05, 1998 at 13:48:09:

: Ex: a.mdb内的table1的资料放入 b.mdb内的 table1
: (这两个Database放在不同路径)
: 有的话要如何做?

Dim recRecordset1 As Recordset
Dim recRecordset2 As Recordset
Dim fld As Field

Set recRecordset1 = FromDB.OpenRecordset(rFrom)
Set recRecordset2 = rToDB.OpenRecordset(rTo)
While recRecordset1.EOF = False
将recRecordset1各栏位值对应复制到recRecordset2
Wend

Follow Ups:

- Re: 请问有没有办法把Database的Table内的资料存入一个Database呢? 丸子 14:57:05 8/13/98 (0)