jjafferr

وعليكم السلام أخوي أبوخليل اذا كان هذا شغلك من زمان ، ماشاء الله عليه وعليك جعفر

تفضل الاكسس 2003 فما دون ، كان فهيم ولكن الاكسس 2007 فما فوق ، عنيد هاي نكته ، ولا تحاسبني عليها الموضوع كله له علاقة بأي نوع تريد Recordset يعمل: ADO او DAO وهذا له علاقة في ايهم في القائمة قبل الثاني: فاذا اردت ان تكتب Recordset وبدون ان تذكر من ايهم (لأنهم الاثنين عندهم Recordset) ، فتلقائيا في الاكسس 2007 فما فوق ، يعتبره الاول على القائمة (تذكر النكته اللي قلتها لك فوق ) فعلشان تحل الموضوع ، وتترك ترتيب Reference مثل ماهو ، يجب ان تقول: Dim rst as dao.Recordset ونفس الشئ بالنسبة الى Dim dbs as dao.Database وتغير هذين السطرين في جميع الكود ، والحمدلله رب العالمين جعفر 93.ACCOUNT103.accdb.zip

تفضل بنفس الخيارات الثلاث (على فكرة ، انا عملت تغيير في آخر لحظة في مسمى الوحدة النمطية السابقة ، ونسيت اغير المسميات بها ، مما جعلها لا تعمل ) وهنا الخيارات السابقة بعد تعديل الوحدة النمطية ، بالاضافة الى الطلب بين تاريخين كذلك (واستعلامتها تحمل مسمى Two في نهاية الاستعلام) مثلا: الاستعلام الجديد الذي ينادي الوحدة النمطية: جعفر 91.Database1.accdb.zip

رحم الله والديك ، كلك خير وبركة

السلام عليكم أخوي رمهان ، لوسمحت تتكفل بالاجابة على الموضوع سنة الميلاد هجرية ، وانت الخبير في السنوات الهجرية جعفر

السلام عليكم انا اعتذر أخوي رمهان لكن الصداع في طلب المعرفة غير عن الصداع وشئ مدوخ راسك انا غيرت تاريخ احد السجلات في الحقل Datee الى 1-1-2012 ، والان استطيع ان الخص برنامجي الذي ارفقته في مشاركتي رقم 19: جميع الطرق الثلاث تعمل بنفس الطريقة ، وهي: 1. اذا ادخلت اليوم والشهر فقط ، فالبرنامج يعتبر انك تريد يوم وتاريخ هذه السنة ، فعليه البرنامج يضيف هذه السنة ، وتحصل على النتائج 2. اذا ادخلت اليوم والشهر والسنة ، فلا يتدخل البرنامج في الادخال ، وتحصل على نتيجة ذلك التاريخ جعفر

وعليكم السلام أها ، انت تتكلم عن طريقة تنسيق معلومات الحقل نعم التنسيق في مربع النص العادي Plain Text ، عادي والتنسيق في مريع النص ، مع تغيير اعداداته الى "نص منسق" Rich Text ، يصبح شيخ التنسيق جعفر

السلام عليكم مادمت اخذت طريق الاستعلام CrossTab ، فهناك شئ جدا ضروري يجب ان تعرفه ، ولقد كلفني الكثير من العناء والمشقة والتفكير والتصليح والوقت في سبيل معرفته لما تعمل الاستعلام ، فانك تعمل حقل "عناوين الاعمدة" Column Headings ، والعناوين مثل ما ترى هنا ، هي "1-6" و "7-12": واذا القينا النظر الى بيانات الجدول ، سنرى انها تحتوي على بعض الاشهر من 1 الى 12 وعليه ، نتيجة الاستعلام ستكون: ونتيجة النموذج (او التقرير) ستكون: ولكن اذا لم تكن هناك قيمة لأحد الاعمدة (لاحظ في الصورة التالية) ، لقد حذفت سجلات الاشهر من 7 الى 12 من الجدول ، لذا فلا توجد بيانات للعمود 7-12 ، اي لا يوجد حقل اسمه 7-12: فنتيجة الاستعلام ستكون بدون ذلك الحقل (لاحظ عدم وجود عمود اسمه 7-12): ولكن نتيجة النموذج (او التقرير) ستكون: هناك طرق لحل هذه المشكلة: 1. برمجيا عن طريق QueryDef ، بحيث تعيد عمل الاستعلام: TRANSFORM Sum(Table1.ammount) AS Sumمنammount SELECT Year([dates]) AS السنة FROM Table1 GROUP BY Year([dates]) PIVOT IIf(Month([dates]) Between 1 And 6,"1-6","7-12"); وتعدل في عناوين اعمدة الاشهر ، بحيث اذا الاشهر ما موجودة في الجدول ، فانك لازم تحذفها من الاستعلام ، وتعيد حفظ الاستعلام بمعلوماته ، وكود التأكد والتغيير يجب ان تعمله في كل مرة تريد ان تشغل الاستعلام. 2. عند فتح النموذج (او التقرير) : بحيث تضع كود يفحص اذا كان هناك حقل اسمه 7-12 ، فاذا لم يوجد ، فيجب ان تحذف مصدر عنصر الحقل. 3. وهذا ما توصلت اليه أخيرا وبعد مشقة وعناء: في اعدادات الاستعلام ، اكتب اسماء الاعمدة في اعدادات الاستعلام ، وعليه اسماء الاعمدة ستكون دائما موجودة ، بغض النظر اذا كانت هناك بيانات ام لا: ونتيجة الاستعلام: ونتيجة النموذج (او التقرير): جعفر 87.1.Database1.accdb.zip

حياك الله بس هذا نص عادي في التقرير كذلك جعفر 92.New_Line.accdb.zip

انا اعتذر ، فكلامك صح ، لا يوجد 1/1/2012 في Datee جعفر

نعم شغلنا على Datee وعفوا ، هذا هو السجل: جعفر

بس الظاهر في الحلول 2 و3 ، اني وقعت في نفس المشكلة اللي وقع فيها أخوي رمهان ، وطريقته واجد ابسط من طريقتي فمافي إلا الحل رقم 1 جعفر

انا هنا ادمج لك 3 طرق: 1. عن طريق استخدام النموذج: الاستعلام: والنموذج عند الادخال: وكود بعد التحديث لحقل التاريخ هو: Private Sub myDate_AfterUpdate() If Len(Me.myDate) <= 5 Then Me.myDate = CDate(Me.myDate & "/" & Year(Now())) End If End Sub وعليه يصبح حقل التاريخ بالكامل ، وعندها تضغط على زر فتح الاستعلام: 2. عن طريق وحدة نمطية: الاستعلام: والوحدة النمطية Correct_This_Date: Function Correct_This_Date(D) If Len(D) <= 5 Then This_Date = CDate(D & "/" & Year(Now())) Exit Function Else This_Date = CDate(D) End If End Function 3. واخيرا ، وضعت كل شئ في الاستعلام ، بدون نموذج او وحدة نمطية: جعفر 91.Database1.accdb.zip

جربتها وما ضبطت للتاريخ 1/1/2012 يعني لازم تدخل 1/1 فقط ، والاستعلام لازم يعطيك سجل 1/1/2012 هذا كان شرط راعي الغنم ، ادخال اليوم والشهر ، بدون سنة : جعفر

يوجد في التاريخ معلومة في 1/1/2014 كيف يمكن ان يبحث عنها؟ جعفر

تفضل افتح النموذج ، وادخل التاريخ بطريقتك جعفر 91.Database1.accdb.zip

حيا الله أخوي رمهان طريقة حلوة بس هذه الطريقة تنفع اذا كان المعيار لهذه السنة ، وانما للسنوات السابقة لا ينفع جعفر

شوي شوي علينا يالطيب ، تراك سحرتني بطيبة كلماتك تفضل ="jaffar" & Chr(13) & Chr(10) & "Wrote" & Chr(13) & Chr(10) & "This Line" جعفر

تستطيع على الحدث "بعد التحديث" لإدخال التاريخ في الحقل myDate تستعمل هذا الكود: if len(me.myDate) <=5 then me.myDate=cDate(me.myDate & "/" & year(now())) endif باعتبار 19/05 هي خمسة حروف ، فعلى اساسه سيضيف السنة جعفر

وعليكم السلام ليس معيارا ، وانما القيمة في الاستعلام: Date1: Format([DATEE],"dd/mm/yyyy") جعفر

وعليكم السلام الاكسس ابتداءً من الاكسس 2007 (بصيغة accdb) فما فوق لا يحتاج الى اي معالج لتنسيق النص ، فالخاصية فيه تلقائيا جعفر

الله يطول في عمرك أخوي ، هل انت انزلت البرنامج وشفت اللي فيه؟ الفكرة الدارجة في موضوعك ، او الفكرة الدارجة في رأسك البرنامج ، غير التقرير والمسميات ، يعمل اللي تريده 100% هاي انت ما جبت طاريها في الموضوع الاصلي اساسا!! ولكن ، اعطنا معلومات زيادة ، وبدل النسخ واللصق ، يمكن نستطيع ان نجعلك تُدخل البيانات كلها في كبسة زر من الاكسس تقدر تستخدم حقل المسار في الجدول ، وتقدر بدون هذا الحقل (راجع الرابط وجرب البرنامج) انت اصلا ماعندك حقول في الجدول بهذه المسميات !! يجب ان تكون هذه المعلومة في جدول مستقل ، وتضيف في جدول الطلبة حقل يوضح في اي فصل/صف هذا الطالب موجود خلال هذه السنة الدراسية ، ويربط بين الجدولين بهذا الحقل لما تنتهي من عمل الجداول والنموذج ، يكون عمل التقرير سهل لاحقا المعلومة اللي كنت احاول ان أُصلها لك هي : ما ممكن (غالبا) ان تحصل على برنامج جاهز وفيه جميع الخاصيات اللي تريدها ، لذا ، جرب الموجود الاقرب الى طلبك ، وغيّر فيه/زد عليه ، حتى يكتمل اللي تريد الخطوة التالية ، ان تعمل الجداول ، ونموذج الطلبة ، وسنساعدك من المكان الذي توقفت فيه جعفر

وعليكم السلام هذا الرابط قريب من طلبك ، ولكن بمسميات مختلفة: http://www.officena.net/ib/index.php?showtopic=61911 جعفر

وعليكم السلام انا اعطيتك الرابط اعلاه ، فهل نظرت فيه؟ هو يقوم بالذي تريد! وبعدها ، تطور البرنامج في الرابط اعلاه الى : http://www.officena.net/ib/index.php?showtopic=61295 جعفر