VB中怎样用ADO从ORACLE中复制一个表到ACCESS数据库？

[lemonchina]

我的代码如下：
Dim conn As ADODB.Connection
Dim rst As ADODB.Recordset
Set conn = New ADODB.Connection
With conn
.CursorLocation = adUseClient
.Open "Provider=MSDAORA.1;Password=a;User ID=a;Data Source=XXX;Persist Security Info=True"
End With

conn.Execute "SELECT * INTO [E:\database1.mdb].[某表] FROM [某表]"

运行时提示错误