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

[محمد القدسي]

السلام عليكم 

كيف يمكن معرفة حجم القاعدة الامامية ثم ضغطها عند رقم معين

وبارك الله فيكم

[محمد أبوعبدالله]

وعليكم السلام ورحمة الله وبركاته

لمعرفة حجم قاعدة البيانات نستخدم الامر

FileLen(CurrentDb.Name)

مع ملاحظة ان الرقم يخرج بالبايت بعني انك ستحتاج الى قسمته على 1024 ليعطيك الحج بالكيلوبايت ثم القسمة على 1024 ليعطيك الحجم بالميجا

11 دقائق مضت, محمد القدسي said:

ثم ضغطها عند رقم معين

استخدم الكود التالي وهو عند حجم 30000000 بايت يما يعادل 30 ميجا تقريباً

         If FileLen(CurrentDb.Name) > 30000000 Then
            Application.SetOption "Auto compact", True
        Else
            Application.SetOption "Auto compact", False
        End If

 

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

تحياتي

[محمد القدسي]

سلمت يداك اخي واستاذي محمد

[محمد أبوعبدالله]

13 دقائق مضت, محمد القدسي said:

سلمت يداك اخي واستاذي محمد

بالتوفيق اخي الكريم

تحياتي

[النجاشي]

بارك الله فيك استاذنا الفاضل ابو عبدالله

تحياتي اليك