سؤال-تعديل في امر نقل الجداول من قاعدة الى اخرى

[saif13]

السلام عليكم

اخوان لدي هذه القاعده

 

تقوم بانشاء قاعده اخرى على اللسواقه سي

 

وتقوم بنقل كافة الجداول الموجوده والاستعلامات ايضا

 

كيف استطيع من ان

اجعلها باي امتداي اريده مثلا الملف الحالي

 

وايضا تقوم بنقل الجداول التي  انا احددها فقط وليس جميع الجداول

وايضا تقوم بنقل الاستعلامات التي انا احددها فقط  

 

ولكم الشكر الجزيل

 

نقل جداول واستعلامات.zip

[ابوخليل]

انظر هنا فقد تستفيد من هذا الموضوع

http://www.officena.net/ib/index.php?showtopic=34596

[saif13]

انظر هنا فقد تستفيد من هذا الموضوع

http://www.officena.net/ib/index.php?showtopic=34596

 

الاخ ابو خليل موضوعك هذا هو ما كانت منه انطلاقتي بتعديل قاعدتي الاصلية الموجوده...

[ابوخليل]

 

كيف استطيع من ان

اجعلها باي امتداي اريده مثلا الملف الحالي

وايضا تقوم بنقل الجداول التي  انا احددها فقط وليس جميع الجداول

وايضا تقوم بنقل الاستعلامات التي انا احددها فقط  

 

 

لنقل جدول محدد :

DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\Database1.mdb", acTable, "Table1", "Table1"

وهذا لنقل استعلام محدد

DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\Database1.mdb", acQuery, "Query1", "Query1"

واذا اردت  جعل القاعدة الجديدة في الملف الحالي اي بجانب قاعدة البيانات  لنفرض ان المسار هو  "C:\Database1.mdb"  فسيكون بعد التعديل ::

CurrentProject.Path & "\Database1.mdb"

[saif13]

انا اشكرك كثيرا اخي 

أبـوخليل

  اني استفيد كثير من ملاحظاتك

 

اتمنى لك التوفيق والرفعه والعلم الوفير