ابوخليل

من المثال المرفق تبين لي ان الدالة من عمل @Foksh فأهل مكة ادرى بشعابها

الافضل لك ان تزيل التنسيق ليصبح السطر هكذا GenerateID = CLng(yearPrefix & (serialPart + 1)) جرب لن تخسر شيئا ولكن الرقم سيكون عاديا بدون اصفار وسيتزايد مثله مثل الارقام العادية .. وفي السنة الجديدة يبدأ بواحد بعد السنة

المفروض تفيدنا اولا هل عملت معك ام لا ؟ والفرق الذي تسأل عنه هو انك تجاوزت نطاق العدد بعد السنة كأقصى رقم ثم يظهر خطأ هو 6 تسعات 999999 في الدالة التي لديك عندما يصل العدد الى الحد الاقصى لن ينتقل الى سنة جديدة بل سيظهر خطأ وسوف تنتظر حتى دخول السنة الجديدة

Public Function GenerateID(TableName As String, fieldName As String) As Long Dim currentYear As Integer Dim yearPrefix As String Dim maxID As Long Dim serialPart As Long currentYear = Year(Date) yearPrefix = currentYear & "" maxID = Nz(DMax(fieldName, TableName, fieldName & " LIKE '" & yearPrefix & "*'"), yearPrefix & "00") serialPart = CLng(Mid(maxID, Len(yearPrefix) + 1)) GenerateID = CLng(yearPrefix & "000" & (serialPart + 1)) End Function هذه تعمل

جرب يا حافظ على دالتك الاصلية نقص صفر من التنسيق في هذا السطر ليصبح 3 اصفار GenerateID = CLng(yearPrefix & "000" & (serialPart + 1))

تفضلي التعديلاات كالتالي : 1- وضعت الوان في النموذج الرئيسي للاستدلال على الخطابات التي تم الاطلاع عليها .. الاخضر تم والبرتقالي لم يتم 2- في حدث العداد للنموذجين الفرعيين جعلت الوقت 5 ثواني ( كل 1000= ثانية ) يمكنك زيادة الوقت وهو الافضل مثلا 300000 = 5 دقائق بمعنى كل 5 دقائق يتم تحديث النموذج لمعرفة ان كان هناك خطابات جديدة الآن عند فتح النموذج الفرعي سيفتح بلا بيانات انتظري 5 ثواني لتري التيجة جربي ووافيني بملاحظاتك مراسلة3.rar

انظر هذه الخطوة الاولى تم التصرف في المفاتيح حسب حاجة التصميم ( الاختيار العشوائي سيتم على المفاتيح ) فقط حتى تتخيل كيف سيكون الاخراج الخطوة التالية هي 1- تشغيل الاختيار العشوائي 2- ربط النموذج الفرعي بجدول الاجابات 3- تشغيل الوقت الاختيار العشوائي يتم عند فتح النموذج من غير تدخل يدوي او ازرار اذا اعجبك العمل واردت ان نستمر يا ليت تفتح موضوع جديد وعنوان جديد مناسب مثلا برنامج اختبارات او قياس قدرات او تقييم مهارات ونحو ذلك مما ينطبق على غرضك لأن العمل يستحق ذلك التعليق والملاحظات مفتوح للجميع .. باعتباره موضوعا ودرسا تعليميا new_test1.rar

المتغير هذا والدالة تحته من اجل تحديد رقم القسم فالاقسام معرفاتها تبدأ من رقم 1 وحتى 5 في حدث تحميل النموذج المتغير strSectionID يأخذ قيمة معرف القسم .. يمكنك الاطلاع Public strSectionID As Integer ' اعلان عن متغير عام رقمي Public Function funSectionRecordCriteria() ' هذه الدالة تأخذ قيمة المتغير نستفيد من هذه الدالة كمعيار داخل الاستعلام فهي تحمل رقم القسم funSectionRecordCriteria = strSectionID End Function ليه استخدمنا الدالة كمعيار بدلا من المعيار المعتاد : forms!form1!text1 ? لأن الدالة تأخذ قيمة معرف القسم عند تحميل النموذج الخاص بالقسم فلو كان عندنا 10 نماذج وكل نموذج لقسم مختلف فالدالة تأخذ قيمة كل نموذج عند فتحه بواسطة المتغير strSectionID وهذه القيمة هي التي نستخدمها كمعيار في الاستعلام وللعلم يمكننا الاستغناء عن الدالة واستخدام معيار القسم مباشرة اذا كان كل ملف فرعي يعمل لوحده مثلا ملف او واجهة القسم القانوني نضع في الاستعلام رقم 4 كمعيار ....................... بالنسبة للاشعار فإليك الطريقة : نضيف حقل خانة نعم/لا في السجل تكون نعم افتراضيا في نموذج العرض البعيد (القسم) نضع كود في حدث الحالي للنموذج والافضل يكون في حدث العداد هذا الكود يفحص آخر سجل على الاقل اذا خانة الاختيار true تظهر رسالة بوجود رسالة او سجل جديد ويمكن ان نعمل على الا يظهر هذا السجل للمستخدم الا بعد الموافقة .. والموافقة تعني تحويل الخانة الى false وظهور السجل

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

يالله ياولاد بسرعة افطروا اوديكم المدرسة الوقت بياخذنا انا اعتقد اني قدمت افضل ما لدي وارفع يدي معتذرا عن مقاطعتكم وان اكون سببا في تأخر الحصول على المطلوب 🙋‍♂️

المفروض انك تبني تصميمك على مثال يخص عملك لا فرق بين ما تفكر به وما اقترحه عليك سوى التنظيم المسألة يسيرة والفكرة لن تأخذ وقتا طويلا واطلق لخيالك العنان .. يجب ان يكون العمل قابلا لأي توسع وتطوير اترك المثال الحالي بعيدا عنك .. واعمل مثالا يخص عملك على النحو التالي : العمل سيكون مختصرا باقل كمية من البيانات الخطوة الأولى : 1- جدول مجموعات : رقم معرف / المجموعة (مدراء / معلمين / موظفين ...الخ) 2- جدول مفاتيح : معرف المفتاح / رقم فرعي للمجموعة 3- جدول الاسئلة واجاباتها : رقم السؤال /رقم فرعي للمفتاح / السؤال / اجابة1/اجابة2/اجابة3/ الاجابة الصحيحة اربط علاقة رأس باطراف على التوالي : المجموعات بالمفاتيح ..... والمفاتيح بالاسئلة من خلال اجدول المجموعات يمكنك النقر على علامة الزائد وتسجيل اكثر من مفتاح للمجموعة الواحدة .. مثلا اربعة مفاتيح وايضا من خلال الزائد في جدول المفاتيح يمكنك وضع اكثر من سؤال في المفتاح الواحد لنقل 2 أو 3 اسئلة او اعمل نماذج لادخال هذه البيانات .. انا افضل الأولى واترك النماذج اخيرا بعد عمل البرنامج على الوجه المطلوب هنا يصبح لدينا كل مجموعة لديها اربعة مفاتيح تخصها نجري عليها الاختيار العشوائي حسب المجموعة المختارة ( للعلم جدول المفاتيح يشتمل على حقلين فقط رقميين .. رقم المجموعة وينزل آليا عند ادراج رقم المفتاح) الخطوة الثانية : اجراءات وخطوات تقديم الاختبار

المجموعات التي اتحدث عنها تخص هيكل الاسئلة المطروحة دعنا نسميها مفاتيح .. كل مفتاح تحته اسئلة مدروسة متكاملة سواء 10 او 15 او اقل او اكثر .. وخذ بالاعتبار تمكين التبديل بين هذه المفاتيح بحيث يمكن نقل سؤال من مفتاح الى آخر والعكس والمجموعات التي انت تتكلم عنها هي للتخصيص .. لذا يمكن تخصيص المفاتيح على طريقتك التي تريدها احتمال يخرج للمتسابق 10 اسئلة كلها في التاريخ .. هذا مثال اما على طريقتي فسيخرج له اسئلة تم فحصها والتأكد من شمولها لا مشكلة ان يتكرر سؤال او اثنين في جميع المفاتيح .. اقصد يكون عاما تجده في كل مفتاح ..................... في معرفي انظر اهتماماتي .. اي مشروع يبدأ بــــــــ : 1- فكرة ....... ( غالبا تبدأ من مالك المشروع) 2- تحليل البيانات 3- بناء الهيكل او القواعد الاساسية ( الجداول ) 4- تسليم العمل للمنفذ (المبرمج/ المبرمجين ) للتنفيذ قد تجتمع كل هذه بشخص واحد .. و ايضا يمكن توزيع هذه الفقرات على عدة اشخاص وتكليفهم بالمهمة

واضحة عندي زي الشمس وما دام قلت انه يسعدك ويشرفك وضع البصمات .. تحملني حبتين .. وانا متأكد ان كلامي ما راح يعجبك .. ليس لفكرتي بذاتها ولكن في رأسك فكرة لن تسمح لأي فكرة اخرى بمزاحمتها ........................................... 1- المثال هذا الذي تريد تطبق عليه لا يصلح ابدا لأنه عمل للمسابقات الترفيهية 2- السبب بأن المثال لا يصلح حاجتين : استخراج وعرض الاسئلة ولا تنسى اعدادها وهذا شيء مهم /// الثانية طريقة العرض الصحيح لاعداد الاسئلة ان تعتمد على جدولين 1- المجموعات 2- الاسئلة اذا فرضنا ان الذي سوف يطرح على المتسابق 10 أسئلة : ولدينا الف سؤال في جميع المجالات يجب هنا ان يكون لدينا مائة مجموعة كل مجموعة تشتمل على 10 اسئلة هذه العشرة اسئلة تكون شاملة لجميع المجالات .. التاريخ واللغة والدين والجغرافيا وعلم الارض ...... الخ يعني يتم اعدادها بدقة من مختص لمراعات توزيع الصعوبة والسهولة في الاسئلة والاحاطة بجميع الجوانب الاختيار العشوائي يكون على المجموعات وليس الاسئلة .. لأن كل مجموعة يندرج تحتها 10 أسئلة ثانيا طريقة العرض : قائمة في النموذج يظهر فيها الاسئلة العشرة وعلى جانبها او تحتها مربع الاجابات . عند الضغط وتحديد اي سطر تظهر خيارات اجابته في مربع الاجابات كل هذا وساعة الدقائق والثواني تعمل في الأعلى نموذج بسيط شامل لكل احتياجات السائل والمسؤول

تفضل واحدة .. مثل هذه الفكرة اعمل دوما على التعامل مع المعرفات وليس الحقول النصية مراسلة1.rar

اي بصمات ؟؟ هؤلاء هم الذين يجب ان تبين لهم انكم افضل منهم ومن اقسامهم على الاقل يتم ادخال الرقم القومي وكلمة التأكيد يكون مثلا رقم الهاتف .. ومن المؤكد ان ارقام هواتفهم موجده لديكم في السجلات فقط انا اريدك ان تلغي مسألة ... هل هذا اسمك وبياناتك ؟

لم افهم !! الاعداد يتم حصرها من جدول2 .. اي اضافة الى جدول2 ستظهر النتيجة

السلام عليكم ما دام من اهتماماتك البرمجة فالحل يسير جدا الظاهر ان واجهات قاعدة البيانات مشتركة بين عدة اقسام العمل كالتالي : 1- مجلد المرفقات يجب ان يكون بجانب قاعدة الجداول الخلفية 2- يجب ان يكون عرض البيانات عبر استعلام (من اجل الاعتماد على معيار القسم) 3- الواجهات المتعددة .. يجب ان تحمل معرف القسم عند الفتح ( مثلا في فورم اليوزر عند الدخول .. فيكون اليوزر مربوط بالقسم ) حتى لو كان موظف المحاسبة يفتح البرنامج من قسم الادارة لن يظهر له الا ما يخص قسم المحاسبة .. الى هنا كل شيء مفهوم وبالسليم نرجع الى فقرة2 مسؤول النظام يمكنه تخصيص عرض بعض السجلات لقسم دون قسم من خلال عمل معيار في الاستعلام يتيح لذاك القسم الاطلاع واستعراض بيانات السجل هذه افضل وابسط طريقة ارى انها تؤدي الغرض

انظر النتيجة عند نقل الدالة الى محرر النموذج dcount2.rar

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

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

ايضا من ضمن اختصار الادوات : حينما يدخل المتسابق رقمه القومي تظهر بياناته في النموذج نفسه .. يوافق ام لا ولماذا الانتقال لنموذج خاص بعرض البيانات والموافقة ؟ حينما يشارك المتسابق .. لا يسمح له بالمشاركة مرة أخرى الا بعد مرور فترة يحددها الكنترول

تمام فهمت الفكرة .. ليست مسابقات ترفيهية .. بل امتحانات قياس طيب مارأيك بالفقرة 2 .. اي ان الذي يتم عرضه بعد ادراج الهوية هو نموذج واحد فقط وبعد انتها الاجابات أو انتهاء الوقت .. ايهما الاول يغلق النموذج آليا ........... من خلال النموذج الواحد يمكن منح المتسابق الرجوع للاجابات والتعديل عليها ضمن نطاق الوقت المتاح

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

رائع جدا هذه صورة لعملية الاعداد الجميل والشكل النهائي اتمنى اخي ان يتاح الاخراج عبر تقرير .. لما له من المزايا العديدة المفيدة

ليس مفتوح بل هو مقيد بفترة محددة لذا ينطبق عليه ما ينطبق على حالة الفترة التجريبة .. لأن الكل مقيد بفترة محددة المفتوح هو الكامل بدون اشتراك لفترة محددة .. وحتى لو كانت الفترة سنة او سنتين ثم لماذا العميل يقدم او يؤخر التاريخ ؟ مادام عمله نظامي فلن تؤثر عليه هذه القيود . ............................................................. كلامي اعلاه بصفة عامة فيما لو كانت النسخة التجريبية والدائمة واحدة .. فقط اذا انتهت فترة التجربة نرسل له كود تفعيل الاشتراك ......................................................... ولكني سأخالف هذا النظام .. بحيث تكون النسخة التجريبية هي فقط للتجربة واذا اراد العميل الاشتراك نرسل له النسخة المرنة .. ( ملف تنصيب يتم استبدال القديم بالجديد ) السبب : حسب الخبرة .. التسويق للمنتج يجب ان يكون جاذبا للعميل ومن الاشياء الجاذبة ان تشتمل نسخة التجربة على بيانات كافية حقيقة وفي الوقت نفسه وهمية بحيث يمكن للعميل تصفحها وعرضها ورؤية النتائج والتقارير عرض هذه البيانات والتعامل معها بالتعديل كتغيير الشعارات والتعديل على البيانات يسهل عليه فهم البرنامج .. وهي بحد ذاتها تجربة .. لأنها طبق الاصل من بياناته التي سوف يدخلها وهنا التجربة لن تستغرق شهرا .. بل جلسة واحدة .. وربما جلستين للتشاور واخذ الرأي