أحمد مبارك الحيقي

حسن أخي الكريم، لكن أرجو أولاً أن تكتب هنا الاستعلام Query الذي أشرت إليه أعلاه، وبنية الجدول المنسوخ، حتى أستطيع أن أكتب مثالاً لتعبئة هذا الجدول من ذلك الاستعلام...

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

وعليكم السلام ورحمة الله وبركاته... أخي rahmasoft1: ممتاز جداً... الواقع لقد أعجبت بطريقة السؤال وبالسؤال الأخير خاصة... هذا هو التسلسل المنطقي للعمل. كنت بالأمس قد بدأت بحثاً سريعاً للمشاركة في الإجابة عن سؤالك... وقد وجدت سريعاً مثالاً لاستخدام عنصر التحكم A…

بالنسبة للـReset، فهو يسير، وذلك بتعيين الخاصية FilterOn للنموذج إلى False. وقد كان يمكن إزالة التصفية في المثال السابق بمسح محتويات القائمة ومربع النص ثم الضغط على زر تطبيق التصفية. بالنسبة للطباعة، فهناك عدة طرق، ولكن من أجل البساطة لا داعي للاستعلام... يكفي…

أخي الكريم، تجد في الملف المرفق تعديلاً بسيطاً على الكود الموجود من أجل تنفيذ المطلوب... كل الأقساط تم احتسابها باقتطاع الكسر، ما عدا القسط الأخير، تم احتسابه بطرح مجموع ما تم احتسابه في الأقساط السابقة من الإجمالي المطلوب... والله أعلم. Database.rar

وعليكم السلام ورحمة الله وبركاته... أخي الكريم، تتم الإشارة إلى العمود الأول من البند المختار (الذي تم عليه النقر) في مربع تحرير وسرد بالشكل التالي: List1.Column(0) على اعتبار أن اسم مربع التحرير والسرد هو List1. وهكذا بالنسبة للعمود الثاني: List1.Column(1) ثم…

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

راجع هذا الرابط من فضلك

يمكنك استخدام الدالة DateSerial لدمج أجزاء السنة والشهر واليوم. المشكلة الوحيدة في ملفك أن الشهر عبارة عن نص، وهذه الدالة لا تقبل إلا أعداداً صحيحة لكل الأجزاء: السنة والشهر واليوم؛ لذلك استخدمت الدالة Switch لمناسبة أسماء الشهور كما ورد في ملفك مع أرقامها، كا…

أخي الكريم، لديك بشكل عام خياران بالنسبة لحلول الشبكة: الأول: هو الخيار القياسي، والمصمم بشكل خاص لهذه المشكلة. ذلك هو تقسيم قاعدة البيانات إلى جزء خلفي يحوي الجداول فقط، وجزء أمامي يحوي النماذج والاستعلامات والتقارير والماكروات والوحدات النمطية. هذا النص مأخو…

أما عن المرجعية إلى النموذج الفرعي فإن في الملف المرفق تعديل على المثال السابق ليوضح التعامل مع نموذج فرعي. وأما بالنسبة للرابط السابق فهو هنــــــــا ... FilterExample2.rar

أخي الكريم، اسمح لي -ولو كنت سأطيل عليك- أن أقتطع جزءاً من مقدمة درس للعلاقات على هذا الرابط : المقصود من هذا أن أشير إلى أن العلاقات التي تنشئها في الأكسس هي إخبار للأكسس عن العلاقات الموجودة أصلاً عند تصميم الجداول، وهي التي نعبر عنها بوجود حقول مشتركة (رقم …

أختي الكريمة، هذا مثال للتصفية حسب الصورة المعروضة. الكود المسؤول عن التصفية هو فقط التالي: Me.Filter = "OrderLocation = " & IIf(Me.cmbLocation.ListIndex = -1, "OrderLocation", Me.cmbLocation.Column(0)) & _ " And OrderDate = " & IIf(Me.txtDate & "" = "", "Orde…

نعم أخي الكريم... أرجو الاطلاع على الملف المرفق. db (2).rar

وعليكم السلام ورحمة الله وبركاته أختي الكريمة، يمكنك ذلك باستخدام الكود التالي: Private Sub JobStage_AfterUpdate() On Error Resume Next Me.NextStage = Me.JobStage.Column(0, Me.JobStage.ListIndex + 1) End Sub وهو يعين قيمة مربع النص إلى البند التالي ListIndex +…

حسن إذن إن أحببت... أضفت مربع اختيار للنموذج لاختيار "كل المندوبين" مباشرة... db2.rar

ضع الكود في حدث KeyDown وليس KeyPress، واستخدم Keycode بدل Keyascii.... والله اعلم.

هاك أخي الكريم التقرير محتوياً حقلاً إضافياً لاستعادة آخر تقييم باستخدام الدالة DLast، كما في الملف المرفق... والله أعلم. الحافز_2.rar الحافز_2.rar

لا داعي للـ checkbox... يمكن تحقيق ذلك بضبط خاصية المصدر للنموذج وللقائمة بشكل مناسب. المهم أن نجعل القائمة (مربع التحرير والسرد) غير منضم. تجد ذلك في الملف المرفق... والله أعلم. db2.rar

مرفق أخي الكريم ملف طبعته من ملفات تعليمات الأكسس يحوي ثوابت المفاتيح وأرقامها (بنظام Hexadecimal)... مثلاً: 0xD للمفتاح vbKeyReturn ويساوي 13 بالنظام العشري للمفتاح Enter وvbKeyDown = 0x28، ويعادل 40 بالنظام العشري بالنسبة للطرف الآخر من السؤال: SendKeys "{F9…