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

نجوم المشاركات

  1. kanory

    kanory

    الخبراء


    • نقاط

      10

    • Posts

      2,256


  2. أبو عبدالله الحلوانى
  3. Ali Mohamed Ali

    Ali Mohamed Ali

    المشرفين السابقين


    • نقاط

      3

    • Posts

      11,630


  4. Hawiii

    Hawiii

    03 عضو مميز


    • نقاط

      3

    • Posts

      209


Popular Content

Showing content with the highest reputation on 04 ماي, 2021 in all areas

  1. يمكنك استخدام هذه المعادلة =INDEX($B$2:$E$5,MATCH($J3,$A$2:$A$5,0),COUNTA(B2:E2)) البحث عن اخر قيمة فى الصف.xlsm
    3 points
  2. جرب هذا التعديل ووافنا بالنتائج أرجو ان يوافق مرادك ملاحظة: قف علي السجل المراد تحويله ثم اضغط علي الزر وانظر النتائج ولا تنسانا من دعوة بظهر الغيب gov_names.accdb
    3 points
  3. جزاك الله خيرا اخى واستاذى هاوى 💐 وفيك بارك الله واياكم ان شاء الله وفعلا كلام اخى واستاذى هاوى صحيح وارجو العمل به بالتوفيق اخوانى واساتذتى
    2 points
  4. اخي الكريم هل طبق ما في هذه المشاركة للعلم ان التقرير والكود اساسا اعتماده على الارقام .... يعني لو حذفت هذه الارقام يختل الكود وطريقة ظهور البيانات في التقرير وهذا يعيدنا للمربع الاول للسؤال .... 😅
    2 points
  5. أرجو أن يوافق هذا مرادك ولا تنسانا من دعوة بظهر الغيب time.accdb
    2 points
  6. ويمكنك أيضا استخدام دالة التاريخ: = DateSerial(2020,1,1) وهي (عندي) أفضل من كتابتها بين علامتي الرقم وخصوصا لتجنب الخلط بين اليوم والشهر. كذلك تحتاج أن تجعل نوع الحقل تاريخ فربما النوع عندك نص.
    2 points
  7. الرجاء المساعدة فى نقل العميل الذى تم تسديد اخر قسط له أى أنه تم تصفير العمود BO الى شيت ( عملاء خالص ) دون تكراره فى sheet2 ويرحل الصف الذى يليه مكانه Book1.xlsx
    1 point
  8. أعتقد أن صاحب هذا الموضوع أول من كتب كود الشجرة في مواقع الأكسس العربية على الإطلاق. ليت كل من ينقل عنهم ولو جزئيا ذكر المصدر وإن كان يجهله فليذكر اسم المنتدى وإن لم يتذكره فليوضح أقلها أن (الأصل) ليس من جهده. مثال لعرض الشجرة - قسم الأكسيس Access - أوفيسنا (officena.net) تقبل الله صيامكم وقيامكم
    1 point
  9. تم تعديل جزء كبير من الملف لتفادي اخفاء واظهار الاعمده حسب الشهر فقط كل ماعليك كتابة السنه ورقم الشهر لتتوافق مع الشهر بالاضافة لاختيار الايام المراد عدم احتسابها بالجدول مثلا السبت والجمعه او اي يومين او تتركهما فارغة حسب الاجازة الاسبوعية عندكم فضلا التجربة وبعدها ندخل للجزئية الثانية من الطلبات طلب اعتماد التعديل على هذا الملف.xlsm
    1 point
  10. أولا - فلا شك ان هذا لا يعتبر مشاركة لقاعدة البيانات فكل مستخدم من العشرة لديه بيانات تختلف تماما عن الآخر - وهذا أيضا سيجعل من التعديل علي قاعدة البيانات أو صيانتها أمرا صعبا. ثانيا- فكرتي أن تجعل الجدول الجديد بقاعدة بيانات فارغة تحوي هذا الجدول وفورم واحد به زر واحد بعنوان تحديث قاعدة البيانات هذا القاعدة يتم توزيعها علي العشرة مستخدمين ليضغط كل واحد منهم علي الزر تحديث قاعدة البيانات فماذا يحدث؟!! 👇 مهمة الزر هو تصدير الجدول الجديد الي قاعدة البيانات القديمة وانتهي الأمر تمنياتي بالتوفيق
    1 point
  11. الطريقة البسيطة التي استخدمها انا مع الزبائن ادخل على كمبيوتر الزبون بواسطة برنامج (اني ديسك ) واقوم بنسخ الجدول الى قاعدة البيانات الخاصة به او اقوم بنسخ قاعدة البيانات الخاصة به واعدل عليها وارجعها له اذا يوجد طريقة افضل مثل تحديث تطبيقات الخلوي ---- يا ريت منكم نستفيد
    1 point
  12. الصورة لا تكفي على كل حال من وجهة نظري لا توجد مشكله لكونك تسخدم نموذج مستمر وهذا الفراغ بسبب عدد السجلات كلما قل عدد السجلات كان الفراغ اكبر وكلما زاد عدد السجلات يكون الفراغ اقل انت تعتبر الامر مشكله لذا الحل الاول اجعل هذا النموذج المستمر نموذج فرعي وحدد عدد السجلات التي تظهر عن طريق تحديد حجم الفورم الفرعي مثلا عدد السجلات التي تظهر 5 او 6 سجلات و الحقل الظاهر اسفل النموذج ضعه في النموذج الرئيسي مباشرة اسفل النموذج الفرعي وهو الحل الاكثر عمليه في حالتك
    1 point
  13. فقط قم بتفعيل استخدام معالجات عنصر التحكم
    1 point
  14. بالنسبة لعبارة مخزن تجدها في التقرير اما رقم ١ و ٢ و٣ تجدها في الاستعلام لاحظ الصور ... الشرح فيها
    1 point
  15. هذا طلبك الاول ... قي المرفق ... انظر الصورة .... هذه النقطة معتمده في الاساس عل الاستعلام الذي انت فعلته .... انظر الاستعلام ومن اين اتت هذه المسميات لأنها موجودة في برنامجك اساسا ‏‏DATA144 - kanory.mdb
    1 point
  16. مشاركة من الاساتذه : طريقة اخرى تمكنك من اختيار مخازن بعينها لتظهر في التقرير ..... جرب ووافينا بالنتيجة ... ‏‏DATA144 - kanory.mdb
    1 point
  17. ارفع مثال بالمشكلة ليتمكن اخوتك من تشخيصها عن قرب
    1 point
  18. وعليكم السلام ورحمة الله وبركاته الملف وبه الكود headr.xlsm
    1 point
  19. جرب هذا التعديل الروضة.xlsm
    1 point
  20. السلام عليكم و رحمة الله تعالى و بركاته إن من بين الأشياء الأكثر إرهاقا التي تعيق عمل المبرمجين هو تحديث قاعدة البيانات لدى الزبون فلا تستطيع إعطاءه قاعدة جديدة لأن جميع بياناته مسجلة في تلك القاعدة أما إضافة التحديث يدويا هذا يتطلب منك التنقل إلى الزبون أو الإتصال عن بعد و ربما الزبون لا يملك الأنترنت و الأكثر من ذلك ربما نستطيع التحديث يدويا لقاعدة البيانات و ماشي الحال فرضا هذا الشخص له عدد كبير من النسخ الإحتياطية 60 أو 70 أو أكثر و أراد ربط البرنامج بأحد النسخ الإحتياطية هل يتوجب على المبرمج التنقل له مرة ثانية؟؟ لكل مبرمج طريقته الخاصة بإضافة التحديث لقاعدة بيانات الزبون مع الحفاظ على بياناته سوف أقوم بطرح طريقتي التي أعمل بها و أتمنى من زملائي الأساتذة ممن لديهم طرق أخرى طرحها من أجل إثراء الموضوع. أولا: أنا أضع وحدة نمطية في ملف الواجهة تتحسس لوجود التحديث في قاعدة الخلفية إن لم تجدها فتقوم تلقائيا بإضافة هذا التحديث. الكود يعتمد على أوامر SQL و قد سبق لي أن شرحت هذه الدوال في هذا الموضوع: شرح دوال SQL التحديث هو عبارة عن إضافة جدول جديد أو إضافة حقل لجدول موجود الوحدة النمطية التالية: تقوم بإضافة جدول جديد لقاعدة البيانات اسمه tbl2 و إضافة حقل Age لجدول tbl1 Function edit_db() On Error Resume Next Dim app As Access.Application Dim file_data As String Dim sq As String 'مسار القاعدة file_data = CurrentProject.Path & "\DB.mdb" Set app = CreateObject("Access.Application") app.OpenCurrentDatabase (file_data) app.Visible = False DoCmd.SetWarnings False 'كود إنشاء جدول sq = "CREATE TABLE tbl2_fav ( id COUNTER PRIMARY KEY, name_adm text(50), num integer)" app.DoCmd.RunSQL sq ' كود إضافة حقل لجدول موجود sq = "ALTER TABLE tbl1 ADD COLUMN Age integer" app.DoCmd.RunSQL sq DoCmd.SetWarnings True app.Quit acQuitSaveAll Set app = Nothing MsgBox "تمت العملية بنجاح" End Function ونقوم بإستدعاء هذه الوحدة النمطية عند فتح ملف الواجهة حاول تحذف الجدول tbl2 و الحقل Age من الجدول tbl1 من الملف db و شغل الملف programme ثم أعد فتح ملف db سوف تجد البرنامج قد أضاف الجدول و الحقل تلقائيا. update-db.rar
    1 point
×
×
  • اضف...

Important Information