ضغط واصلاح قاعدة بيانات الجداول البعيدة بعد عمل نسخة احتياطية لها

[ابوخليل]

السلام عليكم 

خاص لقاعدة البيانات المنقسمة

قد يحدث مشكلة لقاعدة بياناتك على الخادم  وحينها تضطر الى الدخول للموقع وعمل ضغط واصلاح يدويا

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

نسختين ..    mdb  و  accdb

انقل لبرنامجك النموذج والوحدة النمطية

غير اسم الجدول المحاط بالمربع الأحمر الى احد جداولك المرتبطة

Private Sub zer1_Click()
Call BKUpdb
Call CompactSer
End Sub

 

 

نسخة جداول واصلاح.rar

[صابر سليمان]

استاذنا @ابوخليل

مبدأيا لحضرتك جزيل الشكر علي ما بذلته معي لحل مشكلتي 
جزاكم الله كل خير 

عند التطبيق ظهرت لي هذه الرسالة .. 
 

تم تعديل مارس 22, 2023 بواسطه صابر سليمان

[صابر سليمان]

الفكرة يااستاذنا @ابوخليل
أنه طالما احد المستخدمين يستخدم القاعدة او فاتح القاعدة دون استخدام ( القاعدة الامامية FE )..  لا نستطيع عمل ضغط واصلاح في القاعدة الخلفية بل لا نستطيع ان نفتحها اصلا عند حدوث هذه المشكلة وتظل قيد الفتح فترة طويلة جدا الا ان يقوم جميع المستخدمين بغلق البرنامج 
فعلينا اولا  بفصل القاعدة الخلفية عن القواعد الامامية عند المستخدمين وبالتالي يسهل علينا عمل ضغط واصلاح للقاعدة الخلفية  كما تفضلت بحضرتك بهذا المديول الرائع 
وهذه صورة للقاعدة الخاصة بحضرتك توضح انه طالما احد الجداول قيد الاستخدام لا نستطيع عمل ضغط واصلاح 

[صابر سليمان]

استاذنا @ابوخليل

 في انتظار حضرتك 🙄

[ابوخليل]

يوجد حل جذري للمشكلة

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

هذا رابط شرح لتطبيق العملية .. حاول ان تعمله وان استعصى عليك شيىء اطرحه هنا

 

[ابوخليل]

وجدت لك مثالا  يساعدك تم تطبيق الدرس في الرابط اعلاه

 

اخراج المستخدمين من التطبيق.rar

[صابر سليمان]

السلام عليكم ورحمة الله وبركاته 
كل عام وحضراتكم بخير 
اسف جدا علي غيابي لظروف طارئة عندي 
استاذنا الكريم @ابوخليل
كل عام وحضرتك بخير 
مازلت عاجز عن الشكر والله لاهتمام حضرتك بموضوعي وحل مشكلتي 

معلش سامحني 
لقد قرأت الموضوع الذي تفضلت حضرتك به 
لكن هناك بعض النقاط لم افهمها 
 ساقوم بسرد الخطوات والخطوة التي لم افهمها ساذكرها لحضرتك 

1 - نقوم بإنشاء فولدر جديد في بارتيشن النسخة c ونقوم بتسميته mydata
2- في هذا الفولدر نقوم بانشاء ملف text ونقوم بتسميته chkfile.text  ثم نقوم بتغيير امتداد الملف ليصبح chkfile.ozx
3- في نفس الفولدر نقوم بإنشاء قاعدة خلفية ونقوم بتسميتها  Northwind_Be.mdb
4-

1. Import the Customers table from the Northwind sample database into the Northwind_Be.mdb database. (By default, Northwind is located in the C:\Program Files\Microsoft Office\Office10\Samples.)
   
   ( لم أفهم هذه الخطوة والذي فهمته هو استيراد جدول الي القاعدة الخلفية  Northwind_Be.mdb من  اللينك او  الامتداد C:\Program Files\Microsoft Office\Office10\Samples
   وعند اتباع اللينك عندي  لم يظهر office10 بل ظهر office14  وعند الدخول علي samples لم يظهر اي ملف لاستيراده 

[ابوخليل]

زودني بمكان قاعدة الجداول ... (الرابط كامل) .. 

وسوف اعمل لك مثالا  متكاملا ..  عبارة عن نموذج بزري امر ... واحد لاخراج المستخدمين من قاعدة البيانات .. والثاني للنسخ والإصلاح

[صابر سليمان]

تفضل استاذ @ابوخليل

 

تم تعديل مارس 27, 2023 بواسطه صابر سليمان

[ابوخليل]

تمام

ان شاء الله قبل السحور  يكون المثال مكتمل

[ابو جودي]

وقد تفيدكم الافكار فى هذا المثال من حيث 
- اخراج المستخدمين 
- منع دخول المستخدمين لحين انتهاء الادمن من عمل الاصلاح

 

[ابوخليل]

شكرا ابا جودي على اثراء الموضوع

تم عمل مثال شامل للنسخ والاصلاح واخراج المستخدمين

وقسمته الى واجهتين واحدة للأدمن والأخرى للمستخدمين

نقاط هامة يجب التقيد بها عند نقل الكائنلت الى برنامجك  :

- في المرفقات ملف باسم UnOpen.db يجب لصقه بجانب قاعدة الجداول

- يجب اجراء التعديل في الوحدة النمطية الموجودة في واجهة الادمن كما هو موضح في الصورة في اول مشاركة

__________-___________________________________

تجربة المثال :

- اعد الارتباط بقاعدة الجداول data في كلي الواجهتين

- افتح واجهة المستخدم اولا .. انتظر قليلا ستظهر رسالة ثم يغلق البرنامج

- اذهب الى قاعدة الأدمن افتحها واذهب الى نسخ واصلاح ثم ادخل المستخدمين

- ارجع الى واجهة المستخدم وافتحها ستبقى مفتوحة الى ان تغلقها انت

__________________ اعكس التجربة باخراج المستخدمين وانظر تأثيره على واجهة المستخدم

ملحوظة : يمكن العمل على الواجهتين في شاشة واحدة

 

myProg.rar

[صابر سليمان]

شكرا جزيلا استاذنا العبقري @ابوخليل
 قمت بالتجربة علي جهازي  وتم نجاح التجربة .. وجاري التجربة  علي الشبكة وسأوفيكم بالنتيجة 
جزاك الله عنا خير الجزاء استاذنا الكبير 
والشكر  ايضا موصول لاستاذنا @ابو جودي