با سلام
من مي خوام با زدن دكمه‌اي اطلاعات رو از يك بانك ديگه بخونه و به ادامه ركوردهاي بانك اطلاعاتي خودش اضافه كنه. (مثال : در يك اداره يك سيستم اصلي داريم و در بقيه سيستم‌ها اطلاعات ثبت ميشند حالا همه اطلاعات اين سيستم ها در سيستم اصلي يكي ميشه)
خوب من از كد زير استفاده كردم كه در اون Text1 آدرس بانك دوم هستش.


Dim DBase As Database

Dim SQL As String

Set DBase = OpenDatabase(Text1.Text, False, False, "")

SQL = "INSERT INTO Table1'" & App.Path & "\Information.mdb' Select * From Table1"

DBase.Execute SQL

MsgBox ".Úãá ÇäÊÞÇá ÇØáÇÚÇÊ ÈÇ ãæÝÞíÊ Èå ÇíÇä ÑÓíÏ", vbInformation, "Copy Completed"


ولي ارور ميده ارورهايي مثل فايل شناخته نشده و ...
بانك اصلي و بانك دوم هر دو هم نام هستند و نام جداول آنها Table1مي باشند.
آيا به نظر شما اشكال كدي كه نوشتم چيه؟