ابوخليل

اعمل تقرير فرعي داخل التقرير الرئيسي ، ويمكن ان تضع داخل التقرير نموذج فرعي ايضا

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

الملف كامل غير مطلوب فقط انزع النموذجين والجدولين من برنامجك واجعلهما في قاعدة جديدة ثم ارفقهما بعد الضغط

وايضا هذا الرابط في هذا الباب

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

يامرحبـا عـد النجــــــوم بسمانـا ومع جيتــــك عـم الفـرح منتدانـا

جزاك الله خيرا ابا عبدالله وهذا كود للجمع يختلف قليلا والنتيجة واحدة Expr2: (Sum([expr1])\60 & Format(Sum([expr1]) Mod 60;"\:00")) جمع تأخر الحضور.rar

صح يابوعبدالله جبتها الله يقويك طبق ونحن معك ولك الاجر من الله وتجربتي السابقة عند تشغيل البرنامج على جهاز لم يتم اعداد العربية فيه تظهر التسميات بلغة غير مفهومة ولا تظهر رسائل ، وهنا يفهم المستخدم ان جهازه لم يدعم العربية بعد وعند اعداد اللغة العربية وندز هو من يقوم بالتحويل او التغيير

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

جعلنا اسم المستخدم في متغير عام ويتم جلبه عند فتح النموذج وعند الضغط على زر جديد ب2.rar

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

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

If IsNull(Me.date_from) Or IsNull(Me.date_to) Then Exit Sub Me.da.SetFocus Me.da.Text = CalcAgeD(Me.date_from, Me.date_to) Me.mo.SetFocus Me.mo.Text = CalcAgeM(Me.date_from, Me.date_to) Me.ye.SetFocus Me.ye.Text = CalcAgeY(Me.date_from, Me.date_to) هذه الاسطر الموجودة في النموذج والخاصة باستخراج العمر (الفارق بين تاريخين ) ضعها في حدث الحالي للنموذج فحدث الحالي يقوم بالتغيير عند التنقل بين السجلات

الامر يسير ويجب انك تحاول حتى تستفيد فقط انسخ كود المربع الاول للمربع الثاني وغير ما يلزم Prog.1003.rar

تفضل وآمل ان يكون هو بغيتك Private Sub Text0_Click() Text0 = Text0.Name End Sub db2016x.rar

لا يمكنني فتح المرفق .. لا املك في جهازي الا الاصدار2003

تفضل طريقة ارى انها افضل من الكتابة فقط حيث يمكنك الاختيار او الكتابة للبحث عن المفردة Prog.1002.rar

احفظ المرفق على صيغة mdb

وهذا مثال آخر Private Sub co1_AfterUpdate() Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[id] = " & Str(Nz(Me![co1], 0)) If Not rs.EOF Then Me.Bookmark = rs.Bookmark End Sub مربع تحرير.rar

جرب الاصدار 10 وما فوق

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

الدرجة ستكون لمخرج واحد لكل الطلاب والمخرج سيتم اختياره من مربع تحرير في النموذج الرئيسي بعنى سيتم رصد درجة مخرج واحد في كل مرة يتم الحفظ وهكذا الى استيفاء جميع مخرجات المادة ملاحظة : هذه المخرجات اكيد انها مخصصة فلكل فترة مخرجات محددة للمادة .. هل هذا صحيح ؟

If Nz(DLookup("id", "[tbl]", "[c]&[f]&[k]&[d]='" & c & f & k & d & "'"), 0) <> id Then Cancel = MsgBox("مكرر")

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

هذا رابط لموضوع يناقش مشكلتك