حجم قاعدة البيانات

[علي المصري]

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

أعضاء المنتدى الكرام

كل عام انتم بخير

 

حابب اطرح عليكم استفسار

عند حذف جميع البيانات من قاعدة البيانات لدي يبقى حجمه كما هو

فهل من طريقة لتقليص حجمها مرة اخرى

 

شكرا جزيلا

[jjafferr]

وعليكم السلام أخي علي 

 

نعم ، الضغط والاصلاح 

 

 

جعفر

[علي المصري]

اخي الحبيب  jjaffer

جزاك الله خيرا على سرعة الرد

وكني قمت بعمل ذلك وظل الحجم تقريبا كما هو

هل يوجد كود برمجي لعمل ذلك

شكرا

[jjafferr]

هذا معناه ان عندك صور مضمنه في النماذج او التقارير ، وعليك جعلها مرتبطه 

 

جعفر

[محمد سلامة]

السلام عليكم

تحياتى لاستاذنا الكبير جعفر وبعد اذنك

من خيارات الاكسس

جرب حدد الخيار "ضغط عند الاغلاق"  و " ازالة المعلومات الشخصية من خصائص الملف عند الحفظ" 

ستجد القاعدة تقلص حجمها تماماً

تحياتى لك وللاستاذنا جعفر

تم تعديل سبتمبر 8, 2015 بواسطه محمد سلامة(soft.sample)

[jjafferr]

حيا الله أخوي محمد 

[علي المصري]

بالنسبة للصور

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

اما بالنسبة للضغط عند الغلق

جربته أيضا ولم يتقلص الحجم القدر المطلوب

 

شكرا جزيلا

 

FollowUp.rar

تم تعديل سبتمبر 8, 2015 بواسطه علي المصري
اضافة مرفق

[jjafferr]

عندي 3 اقتراحات:

 

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

2. اعمل برنامج جديد فاضي ، واستورد كائنات البرنامج السابق اليه ،

3. ارفع البرنامج في احد المواقع بعد ضغطه ، وارسل لس الرابط على الخاص ، وسأنظر فيه ان شاء الله 

 

جعفر

[REDA.M.A]

السلام عليكم

اعتقد ان هناك جدول للنظام موجد فيها بيانات حيث ان يقوم  اكسيس بتكوين جدول للنظام  مخفيه و تحتوي على بيانات -  مرفق شرح الغاء مثل هذه الجدول . والله اعلم وهذا على حسب علمي بالامر . تحياتى

شرح حذف جداول النظام.rar

تم تعديل سبتمبر 9, 2015 بواسطه رضا محمد على احمد
اضافه

[علي المصري]

تمام أستاذ رضا

ولكن هل يؤثر ذلك على قاعدة البيانات

[REDA.M.A]

استاذ : على

السلام عليكم

مش هنخسر حاجه لو جربت حذف هذه الملفات مع الضغط و اصلاح . و ربنا يسهل الحال .

تحياتى

[yms12]

اخي عبدالله

خذ نسخة احتياطية وجرب فكرة الاخ رضا

وممكن تعمل تفتح قاعدة فارغة وتقوم باستيراد جدول واحد وتعمل ضغط وتشوف الحجم حتى تجد الملف صاحب المشكلة

تحياتي

[jjafferr]

السلام عليكم الاستاذ علي 

 

انا اعتذر منك ، فلم ارى مرفقك إلا الآن 

والسبب اني لم اره ، هو انك عدلت في مشاركتك ووضعت فيه المرفق ، بعد مشاركتي !!! 

 

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

في مشاركتي الاخيرة قلت:

عندي 3 اقتراحات:

 

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

 

.

وبالفعل هي مشكلة برنامجك !!

عندك 42 نموذج ، بهم صورة او اثنتين ،

و 23 تقرير ، بهم صورة او اثنتين .

.

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

غير طريقة عرض الصور من Embedded او Shared الى Linked ، واضغط واصلح البرنامج ، وان شاء الله البرنامج يصغر حجمه 

 

 

جعفر

 

[علي المصري]

شكرا جزيلا استاذنا الفاضل جعفر

وجزاك الله خيرا

وانا متأسف لاني نسيت وحملت النسخة التي تحمل كلمة مرور

شكرا مرة أخرى وسوف اعمل  على تحويل نوع الصور إلى مرتبطة

شكرا

 

[wael_rafat]

السلام عليكم

اساتذتي الكرام لي استفسار 

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

مع الشكر

تم تعديل يناير 13, 2016 بواسطه wael_rafat

[علي المصري]

ضع نفس الكود في حدث الحالي للنموذج

[wael_rafat]

تسلم استاذ علي وجاري التجربة

مع الشكر  والتقدير

[jjafferr]

وعليكم السلام أخي وائل 

 

هذين الرابطين فيها معلومات وامثلة على اللي تريده:

http://www.officena.net/ib/topic/60554-ادراج-صورة-من-الماسح-_-سحب-الصور/#comment-391252

http://www.officena.net/ib/topic/62143-هدية-سحب-اكثر-من-صورة-من-الاسكنر-وتحويلها-الي-pdf-او-صور-مسلسلة/#comment-402210

 

جعفر

[wael_rafat]

استاذ علي  مشكور على التفاعل  ولكن  للاسف الملف مغلف  بكلمة سر ولم استطيع رؤية الاكواد

استاذنا الجميل جعفر  منور والله  ويا رب ما ننحرم  من وجودك معنا  ...  سامحني لم استطيع الوصول لطلبي

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

Desktop.rar

مع كل الشكر والتقدير

[أبو عبدالله الحلوانى]

تفضل أستاذ وائل تم التعديل على مرفقك - بشرط أن يكون مجلد الأيكونات موجود مع البرنامج بمكان واحد 

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

 

Desktop.rar

[jjafferr]

السلام عليكم 

 

اليكم طريقتي بدون عنصر الصورة ، وانما وضعت الصورة على الزر مباشرة 

 

1. عملت صورة مائلة الى السواد لكل الازرار ، حيث سنستفيد منها عند الضغط على الزر حتى تعطينا الشعور بضغطة الزر 

وكتبت الكلمة التي يجب ان تكون على الزر ، حيث ان اعدادات الزر يأخذ احدهما: الكلمة/النص او الصورة ، ولا يأخذهما معا:

.

2. هذه اعدادات الزر ، وسنجعل الصورة على خاصية Picture للزر:

.

وهذا كود ثلاثة احداث تقوم بالعمل:

Option Compare Database

    Dim image_Path As String
    
    
Private Sub cmd1001_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

    Me.cmd1001.Picture = image_Path & "\01-1.bmp"
End Sub

Private Sub cmd1001_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

    Me.cmd1001.Picture = image_Path & "\01.bmp"
End Sub

Private Sub Form_Load()
On Error GoTo err_Form_Load

    image_Path = Application.CurrentProject.Path & "\icons"
    
    Me.cmd1001.Picture = image_Path & "\01.bmp"
    Me.cmd2005.Picture = image_Path & "\02.bmp"
    Me.cmd3008.Picture = image_Path & "\03.bmp"
    
Exit Sub
err_Form_Load:

    If Err.Number = 2220 Then
        Resume Next
        
    Else
        MsgBox Err.Number & vbCrLf & Err.Description
        
    End If
    
End Sub

.

والنتيجة:

.

 

جعفر

235.Desktop.zip

[أبو عبدالله الحلوانى]

لا حرمنا الله من ابداعاتك 

[قلم-الاكسل(عبدالعزيز)]

برنامج جميل وكود روعة

[wael_rafat]

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

استاذنا الفنان جعفر ماشالله عليك مبدع كالعادة ربنا يحفظك ويبارك فيك  تسلم ايدك ويسلم معصمك   ويا رب مايحرمنا من لمساتك وابداعاتك 

مع كل الشكر والتقدير