اذهب الي المحتوي
أوفيسنا

أ / محمد صالح

أوفيسنا
  • Posts

    4,357
  • تاريخ الانضمام

  • Days Won

    185

كل منشورات العضو أ / محمد صالح

  1. غريبة !!! كل الروابط لا تعمل ربما يرفعه لك أحد الأصدقاء ممن لديه نسخة من البرنامج هنا على سيرفر الموقع حتى لا تضيع بإذن الله .................................... بعد البحث في المنتدى وجدت هذا الموضوع
  2. يلزمك الرجوع إلى أحدث نسخة احتياطية من البرنامج حيث أنه بهذه الطريقة قد تلف وجرب استعمل ملف النسخ الاحتياطي والضغط لعمل ضغط وإصلاح لهذه القاعدة من الخارج الملف موجود في مكتبة الملفات قسم الأكسس https://www.officena.net/ib/files/file/285-النسخ-الاحتياطي-والضغط-بخيارات-متقدمة/
  3. هذه الفكرة تناولها أحد الزملاء وصمم برنامجا سماه أبو الحروف يمكن البحث عنه في جوجل
  4. لله الأمر لن تستطيع الاستفادة من الأكواد في الملف إذا لم تحل المشكلة الخاصة بفك الضعط نصيحتي @nogom حاول واجتهد ولا تكسل لأننا بهذا حصرنا المشكلة في برنامج التحميل أو برنامج فك الضغط موفق إن شاء الله
  5. شكرا لكملاتك العطرة بالنسبة للمقترحات لا يوجد مستحيل إلا في أذهان الكسالى فقط ينبغي أن تحدد هدفك وتستعمل الموارد المتاحة لتطبيقه والملف مفتوح وبه أكواد جميلة ستساعدك في الوصول إلى ما تريد بإذن الله ولا تبخل علينا بملفك بعد تنفيذ المقترحات كما لم يبخل عليك غيرك كل عام وجميعنا بكل خير
  6. الحمد لله تم إخراج الإصدار الثاني إلى النور وفيه : معالجة خطأ يظهر أحيانا عند استعمال النسخ مع الضغط والإصلاح وإضافة ميزة الضغط والإصلاح فقط التي اقترحها الأستاذ شيفان الحمد لله مرة أخرى على نعمه الكثيرة
  7. ربما يكون الخطأ في برنامج الداونلود أو في برنامج فك الضغط رجاء مراجعتهما وبانتظار رأيك في البرنامج ككل
  8. متعك الله بالصحة والعافية لم يتم استعمال اي ضغط في الملف فقط نسخ قاعدة البيانات باسم جديد مع عمل ضغط وإصلاح لقاعدة البيانات الجديدة لا أدري عن أي ملف معطوب تتحدث إلا إذا كنت تتحدث عن الملف المرفق mas_backup.rar قهذا الملف مضغوط ويتم فك الضغط عنه بصورة طبيعية جدا على أي ويندوز وبأي برنامج للضغط مثل WinRAR أو WinZip
  9. شكرا لكلمات الطيبة وبالنسبة للخطأ رقم 3045 يعني أن قاعدة البيانات في وضع الاستخدام ولم يتم تحديد أي قاعدة بيانات التي قيد الاستخدام إذا تم توضيح ما تقوم به من خطوات وما يظهر من خطأ ربما نجد الحل لمشكلتك مع استعمال الملف حيث أنه تمت التجربة بطريقة ناجحة 100% مع طريقة الاستعمال الصحيحة
  10. شكرا لمرورك الكريم أخي @Shivan Rekany يظهر هذا الخطأ في بعض الأوقات حينما يتم تنفيذ أمر حذف الملف المؤقت قبل أن تنتهي عملية الضغط وتمت معالجتها بفضل الله ومقترح وجود ضغط فقط مقترح جميل أعدك بأن اضيفه بإذن الله إن لم تسبقني حضرتك بها
  11. شكرا لمروركم العطر أخي @نهر الفنون وفقنا الله جميعا لكل ما يحب ويرضى ☝️
  12. شكرا لمروركم العطر أخي العبودي وفقنا الله جميعا لكل ما يحب ويرضى ☝️
  13. شكرا للأستاذ @كريمو2 هذا الملف كان من مقتنياتي في وقت إنشائه من أخينا الفاضل MAXXIN لكن مع مرور الوقت فقدت الملف ورابط الموضوع وظهرت أكواد أسهل وأفضل مما كنا نستعمله في 2007 فهذا جهدي المتواضع لتطوير هذا الملف تجدونه على هذا الرابط وفقنا الله جميعا لكل خير
  14. Version 2.0.0

    809 تنزيل

    بسم الله الرحمن الرحيم كل عام أنتم بخير وسعادة ورضا بمناسبة عشر ذي الحجة وعيد الأضحى المبارك أعاده الله علينا جميعا بالصحة والسعادة استكمالا لسلسلة ما خف وزنه وغلا ثمنه موعدنا اليوم مع ملف يحتاجه كل مهتم بالتعامل مع قواعد البيانات النسخ الاجتياطي أو الضغط والإصلاح بطريقتين أولا لقاعدة البيانات الحالية والثانية لقاعدة بيانات يتم تحديدها مع إمكانية استعمال المجلد الحالي أو أي مجلد يتم تحديده كمكان للنسخ أو الضغط والنسخ وكل ذلك في نموذج واحد وبأبسط كود ممكن ويوجد في الملف الكثير من الأكواد التعليمية الرائعة مثل: استعمال متصفح الملفات المضمن في الأوفيس بدون دوال الويندوز استعمال متصفح المجلدات المضمن في الأوفيس بدون دوال الويندوز استخلاص اسم الملف من مساره الكامل استخلاص امتداد الملف من مساره استخلاص اسم الملف بدون امتداده من مساره استخدام أوامر الدوس داحل الأكسس ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ********************** ملحوظة: الكود يعمل على كل إصدارات الأوفيس تم مشاهدة موضوع في نفس المجال وهو في هذا الرابط وتطوير الفكرة إلى ما وصلت عليه في هذا الملف ******************* دمتم في رعاية الله وحفظه وانتظرونا فالقادم أفضل بإذن الله إن شاء الله
  15. اعرض الملف النسخ الاحتياطي والضغط بخيارات متقدمة بسم الله الرحمن الرحيم كل عام أنتم بخير وسعادة ورضا بمناسبة عشر ذي الحجة وعيد الأضحى المبارك أعاده الله علينا جميعا بالصحة والسعادة استكمالا لسلسلة ما خف وزنه وغلا ثمنه موعدنا اليوم مع ملف يحتاجه كل مهتم بالتعامل مع قواعد البيانات النسخ الاجتياطي أو الضغط والإصلاح بطريقتين أولا لقاعدة البيانات الحالية والثانية لقاعدة بيانات يتم تحديدها مع إمكانية استعمال المجلد الحالي أو أي مجلد يتم تحديده كمكان للنسخ أو الضغط والنسخ وكل ذلك في نموذج واحد وبأبسط كود ممكن ويوجد في الملف الكثير من الأكواد التعليمية الرائعة مثل: استعمال متصفح الملفات المضمن في الأوفيس بدون دوال الويندوز استعمال متصفح المجلدات المضمن في الأوفيس بدون دوال الويندوز استخلاص اسم الملف من مساره الكامل استخلاص امتداد الملف من مساره استخلاص اسم الملف بدون امتداده من مساره استخدام أوامر الدوس داحل الأكسس ولا ينقصني سوى دعاؤكم لي بالخير في الدنيا والآخرة ********************** ملحوظة: الكود يعمل على كل إصدارات الأوفيس تم مشاهدة موضوع في نفس المجال وهو في هذا الرابط وتطوير الفكرة إلى ما وصلت عليه في هذا الملف ******************* دمتم في رعاية الله وحفظه وانتظرونا فالقادم أفضل بإذن الله إن شاء الله صاحب الملف أ / محمد صالح تمت الاضافه 12 أغس, 2018 الاقسام قسم الأكسيس
  16. هذا الملف رائع للأخ الكريم Maxxin ولكن ينقصه بعض الدوال لم ترفق في الملف
  17. المشكلة في كود إنشاء الدائرة جرب هذا الكود Public Sub sbCrclInTxt(Rpt As Report, TxtCtrl As TextBox, TxtDegree As Integer) If TxtCtrl.Value <= TxtDegree Then Dim sngHCtr As Single, sngVCtr As Single, sngRadius As Single sngHCtr = TxtCtrl.Left + (TxtCtrl.Width \ 2) sngVCtr = TxtCtrl.Top + (TxtCtrl.Height \ 2) sngRadius = TxtCtrl.Width \ 4 ' Circle radius. Rpt.FillColor = RGB(255, 0, 0) ' Background Color red. Rpt.FillStyle = 0 ' Fill solid. Rpt.Circle (sngHCtr, sngVCtr), sngRadius, vbRed, , , 0.55 End If End Sub ولتعديل شكل الدائرة يمكن تعديل الرقم 4 الموجود في sngRadius أو الرقم الأخير 0.55 بقيمة أقل من الواحد الصحيح
  18. أضف هذين السطرين Rpt.FillColor = RGB(255, 0, 0) 'backColor red. Rpt.FillStyle = 0 بعد سطر إنشاء الدائرة الذي يبدأبـ Rpt.Circle (mmm, ttt), nnn \ 3, vbRed, وفقنا الله جميعا لكل ما يحب ويرضى
  19. جرب هذا الكود وإن شاء الله سيفلح معك Dim T As TableDef DoCmd.SetWarnings False For Each T In CurrentDb.TableDefs If T.Name Like "d2s_*" Then DoCmd.RunSQL "DELETE * FROM " & T.Name End If Next T DoCmd.SetWarnings True
  20. نعم هذا الكلام صحيح وللعلم حجم 2 جيجا بايت ناقص منه حجم جداول النظام system objects ولتلافي هذه المشكلة يجب: * وضع مسار الصور والمستندات في حقل نصي بدلا من إرفاقها بقاعدة البيانات كما اشار أحد الأحباب * وكذلك عمل قاعدة بيانات لكل عام منفصل ويتم ربط الواجهة على أي قاعدة بيانات في الخلفية للعلم 2 جيجا بايت نصوص وأرقام كثير جدا لك أن تتخيل أن بيانات درجات 100000 مائة ألف طالب في 15 مادة بالإضافة إلى اسم المدرسة والإدارة وغيرها من البيانات يصل حجمها إلى 10 ميجا بايت فقط
  21. هذا الكود يعمل على كل إصدارات الأوفيس من 2002 إلى 2016 أين توجد المشكلة تحديدا؟
  22. تفضل أخي الكريم يمكنك الاستفادة بهذا المثال لاحظ إضافة حقل في الجدول ليحفظ فيه مسار الصورة وتم إضافة مربع صورة وتم إضافة كود اختيار ملف عند النقر مزدوجا على مربع الصورة مع الاهتمام بمراجعة خصائص properties للصورة mas_display_photo_in_form.rar
×
×
  • اضف...

Important Information