استبدال بيانات جدول معين

موضوع منقول من المنتدي القديم

الكاتب: علي حسين

لدينا برنامج مركب على عدة اجهزة وفي عدة فروع في الشركة حصل تغير في جدول العلاوات نريد ان نستبدل جدول العلاوت في كل نسخة من البرنامج بهذا الجدول المعدل فقط دون التغير في الجداول الاخرى لان لكل فرع معلومات وبيانات مختلفة . المشكلة الفروع متباعدة في مختلف المناطق واسهل طريقة للتعامل هي البريد الالكتروني .

رد أبو حمود :

انا فاهم سؤالك ولكن يبدو انك لم تفهم إجابتي

لنفرض ان القاعدة الأساسية اسمها قاعدة1

فيها جدول العلاوت

الآن قم بإنشاء قاعدة جديدة

استورد جدول العلاوات من قاعدة1 إلى القاعدة الجديدة

احذف جدول العلاوت من قاعدة1

الآن افتح قاعدة1 ثم اربط جدول العلاوات الموجود في القاعدة الجديدة بقاعدة1

الآن عندما نغير في جدول العلاوات ماعليك سوى ارسال القاعدة التي فيها جدول العلاوات لنسخها مكان التي عملناها قبل قليل

امل ان يكون الأمر اتضح لك وجرب على نسخة احتياطية

رد حارث :

فكرة

بعد إذن أستاذنا أبو حمود

عندي فكرة بدائية لكني جربتها واستبدلت أحد الجداول ، وأشرحها فيما يلي :

أنشئ قاعدة بيانات جديدة تماما ، وقم بإنشاء جدول بنفس اسم الجدول الذي تريد استبداله في القاعدة القديمة ، وضعه بالتصميم والبيانات التي تريدها .

أنشئ ماكرو جديد وليكن اسمه مثلا Mac1

الإجراء : TransferDatabase

نوع النقل : تصدير

نوع قاعدة البيانات : Microsoft Access

اسم قاعدة البيانات : C:11.mdb طبعا يستبدل بالمسار الكامل والاسم الفعلي للقاعدة القديمة .

نوع الكائن : جدول

المصدر:اسم الجدول

الوجهة : اسم الجدول

البنية فقط : لا

أنشئ في قاعدة البيانات الجديدة نموذج جديد فارغ ، واجعله هو بدء التشغيل ، ثم اجعل في حدث عند الفتح الكود التالي :

Private Sub Form_Open(Cancel As Integer)
DoCmd.RunMacro "Mac1"
MsgBox "تم تصحيح البيانات بنجاح"
DoCmd.Quit
End Sub

وهكذا يتم تصحيح البيانات القديمة آليا بمجرد تشغيل قاعدة البينات الجديدة ثم يتم إغلاقها

لكن إذا كان مسار البرنامج القديم يختلف لدى كل فرع من الفروع ، فتحتاج أن تجعل البرنامج يطالب المستخدم بتحديد المسار ثم يقوم البرنامج بالتصدير ثم الإغلاق . وهذا موضوع مشابه لموضوع النسخة الاحتياطية وإعادة ربط الجداول الموجود في الارشيف فراجعه .

امر آخر : يمكن بدلا من الماكرو كتابة كود ، واختصارا افتح الماكرو في طريقة عرض التصميم ثم اختر حفظ باسم كوحدة نمطية .

بقي موضوع العلاقات بين الجداول ، فإذا كان الجدول الذي تريد حذفه واستبداله في البرنامج القديم مرتبط بعلاقة مع بعض الجداول الأخرى ، فأظن أن هذه الطريقة لا تقوم بحذفه .

وهنا لا بد من البحث عن حل آخر ، وحاليا لدي كود يقوم بحذف العلاقات في قاعدة البيانات الحالية ثم استبدال الجداول في القاعدى الحالية بجداول مستوردة ثم إنشا ء العلاقات من جديد .

أما حذف العلاقات في قاعدة بيانات أخرى فلا أدري كيف .