حفظ نسخة للملف بضغطة زر

[رشبد]

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

الاخوة الكرام لو ممكن برمجة زر لحفظ نسخة للملف في فولدر خاص لحفظ النسخ  جزاكم الله خيرا

المرفق 

Database2.accdb

[kkhalifa1960]

تفضل استاذ @رشبد طلبك حسب مافهمت . ووافني بالرد . 

 ويمكن اضافة اختيارين كمان      ...         1- نسخة مضغوطه    ....     2- نسخة مضغوطة بباسوورد .

CopyDB.rar

[رشبد]

حفظك الله استادي kkhalifa1960

نعم هذا هو المطلوب 

الف الف شكر

[عبد اللطيف سلوم]

5 ساعات مضت, kkhalifa1960 said:

تفضل استاذ @رشبد طلبك حسب مافهمت . ووافني بالرد . 

 ويمكن اضافة اختيارين كمان      ...         1- نسخة مضغوطه    ....     2- نسخة مضغوطة بباسوورد .

CopyDB.rar 22.69 kB · 4 downloads

اخي الكريم يا ريت تعطينا معها خيارات نسخة مضغوطة  و نسخة مضغوطة مع باسوورد 

هذا ما كنا نبحث عنه ويغنينا عن جميع انواع الباك اب

[عبد اللطيف سلوم]

6 ساعات مضت, kkhalifa1960 said:

تفضل استاذ @رشبد طلبك حسب مافهمت . ووافني بالرد . 

 ويمكن اضافة اختيارين كمان      ...         1- نسخة مضغوطه    ....     2- نسخة مضغوطة بباسوورد .

CopyDB.rar 22.69 kB · 4 downloads

حبيب وحدها شغالة تمام

لكن قم تبتجربتها لعى احد البرامج اعطتني خطأ في الحصول على المسار كما في الصورة

[kkhalifa1960]

نفص مكتبات 

تفاصيل المكتبات المستخدمة في الكود:

1. FileDialog:

   • جزء من مكتبة Microsoft Office xx.0 Object Library.

   • يسمح بفتح مربع حوار لتحديد الملفات أو المجلدات.

2. CreateObject:

   • جزء من مكتبة OLE Automation.

   • يستخدم لإنشاء كائنات خارجية، مثل تطبيق Access.

3. DBEngine.CreateDatabase:

   • جزء من مكتبة Microsoft Access xx.0 Object Library.

   • يستخدم لإنشاء قاعدة بيانات Access.

---

إذا كانت المكتبات غير مفعلة:

إذا لم تكن المكتبات المذكورة أعلاه مفعلة، يمكنك تفعيلها يدويًا عن طريق:

1. فتح نافذة المراجع (Tools > References).

2. البحث عن المكتبات المذكورة أعلاه.

3. تفعيلها بوضع علامة صح (✔) بجانبها.

[عبد اللطيف سلوم]

28 دقائق مضت, kkhalifa1960 said:

إذا كانت المكتبات غير مفعلة:

إذا لم تكن المكتبات المذكورة أعلاه مفعلة، يمكنك تفعيلها يدويًا عن طريق:

1. فتح نافذة المراجع (Tools > References).

2. البحث عن المكتبات المذكورة أعلاه.

3. تفعيلها بوضع علامة صح (✔) بجانبها.

انا استخدم اوفيس 365

لا يوجد فيها خيار للوصول الى المكتبات 

اين اجدها ؟؟

2 دقائق مضت, عبد اللطيف سلوم said:

انا استخدم اوفيس 365

لا يوجد فيها خيار للوصول الى المكتبات 

اين اجدها ؟؟

وجدتها

[kkhalifa1960]

أما بالنسبة للطلب نسخة مضغوطة ....  ونسخة مضغوطة بباسوورد ..... سأنشرها بمشارك جديدة كهدية لينتفع بها الجميع .