[Ahmed_Mansoor]

أهلا أخي الكريم , هذه الصيغة :

1- فتح فاعدة البيانات الأولى والتي يوجد فيها الجدول المراد نسخ البيانات منه  وليكن مثلا إسم القاعدة الأولى هو Database1.mdb وكلمة المرو الخاصة بها هي 123 :

PHP كود :

DB.CursorLocation = adUseClient
DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Database1.mdb;Jet OLEDB:Database Password=123;Persist Security Info=False" 


2- نسخ البيانات من الجدول الموجود في قاعدة البيانات الأولى إلى الجدول الموجود في قاعدة البيانات الثانية وليكن إسمها Database2  وكلمة المرور لها هي 456 وإسم الجدول المراد النسخ إليه هو Table2 , ملاحظه سيتم نقل أو نسخ البيانات بدون شروط يعني بدون كلمة Where لذلك لابد أن تكون الأعمدة او الحقول في كلا الجدولين متطابقة :

PHP كود :

DB.Execute "Insert Into [;DATABASE=" & App.Path & "\Database2.mdb;PWD=456].Table2 Select * From Table1"