# Re: 请教怎样在同一个mdb内,复制资料表.

Posted by bmf on August 27, 1999 at 12:14:16:

In Reply to: 请教怎样在同一个mdb内,复制资料表. posted by kkcheung on August 27, 1999 at 09:09:43:

: 我想在同一个mdb内,copy 其中一个资料表,存成另一个名称,可以点做.先谢谢.

Private Sub Command1_Click()
Dim db As Database
Dim rs As Recordset

Set db = DBEngine.Workspaces(0).OpenDatabase(资料库档名)
db.Execute "select * into 资料表2 from 资料表1"
End Sub
资料表２不要事先建立!!!

Follow Ups:

- 再想问一下. kkcheung 13:06:23 8/27/99 (1)
  - Re: 再想问一下. Fai 14:31:11 8/27/99 (0)