ابو عبدالرحمن

إليك أخي العزيز مثال ، لعله يوضح طلبي

ولك جزيل الشكر

db1.rar

جرب هذه الفكرة ايضا

db1.rar

أحبتي الكرام

السلام عليكم ورحمة الله وبركاته

لدي نموذج جدولي ، به بيانات غياب الطلاب لمدرسة عن كل يوم ، كل يوم في سجل

( اليوم - الحضور - الغياب )

المطلوب كيف يمكنني حساب الفرق بين كل يوم واليوم السابق له

فإذا كان اليوم أكثر من اليوم السابق له يسجل البرنامج يسجل البرنامج عبارة مثلا (أسوء)

وإذا كان أقل يسجل ( متحسن)

شاكرا لكم تعاونكم مقدما

يمكن مساعدتك في استفساراتك . رفع برنامجك هنا أو جزء منه ( ما يخص أسئلتك) لإجراء التعديل عليه أو إرساله على البريد saeed11_99@hotmail.com

اعمل مربع نص وسمه com1 وزر أمر ألصق فيه هذا الكود في حدث عند النقر

Dim a As String
com1.SetFocus
FIL1 = "[asnaf] " & "Like '" & "*" & [com1] & "*" & "'"
   Me.Filter = FIL1
   Me.FilterOn = True
      If Me.RecordsetClone.RecordCount = 0 Then
MsgBox"لا يوجد نتائج تطابق ما تبحث عنه"
Me.FilterOn = False
End If

انتبه لمصدر السجل في حقل الأصناف سميته في هذا الكود ب (asnaf) استخدم نفس الاسم أو عدله في الكود كما هو عنك

اتمنى أن يكون هذا هو طلبك

لست متأكدا من فهم سؤلك . ولكن حسب فهمي أنك لم تخفي الجداول وإنما جعلت البرنامج يعمل عند بدء التشغيل .

ان كان كذلك فقم بإلغاء إعدادات بدء التشغيل حيث أنك اخترت نموذجا محددا ليفتح عند تشغيل قاعدة البيانات . أو انك استخدمت ماكرو لعمل ذلك . انظر ماذا عملت أي الطريقتين وقم بإلغائها

ان لم يكن هذا ما تريده فوضح أكثر

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

قد تفيدك هذه الموضوعات

http://www.officena.net/ib/index.php?showtopic=2751&hl=تصفية

http://www.officena.net/ib/index.php?showtopic=626&hl=تصفية

وقد تجد غيرها من الموضوعات

لا أدري عن جداولك والحقول التي فيها .

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

أتمنى لك التوفيق

أخي جمال : لم يتم التعديل على الوحدة النمطية . ولم أتعرف على كلمة السر

كل مافي الأمر أنني أضفت مربعي نص على النموذج واستخدمت منشىء التعبير

وفضلت الإضافة على ملفك حتى يسهل على السائل والاخوة الأعضاء المقارنة بين الطريقتين واختيار ما يناسبه ويفضله

آسف عن التأخر في الرد

وأشكر لك حرصك واهتمامك

أحد طلابك : أبو عبدالرحمن

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

أنصحك بتعديل الجداول بحيث لايصبح هناك تكرار بين حقول الجداول

هذه وجهة نظري لهلك تفتح لك طريقا للحل

أتمنى لك التوفيق

في المعيار

استبدل كلمة نماذج بـ forms

لست متأكدا من فهمي لسؤالك ولكن إليك بعض الروابط من الممكن أن تكون هي ما تبحث عنه

مع اقتراحي عليك بالبحث قبل طرح السؤال لأن هذا المنتدى مليء بالأفكار التي طرحها الأعضاء خلال عمر المنتدى المديد

اخفاء شاشة الاكسس نهائيا

http://www.officena.net/ib/index.php?showtopic=1283&hl=

وهذه شاشة افتتاحية للاكسس

http://www.officena.net/ib/index.php?showtopic=3143&hl=

وهذه اخرى

http://www.officena.net/ib/index.php?showtopic=3444&hl=

وجرب هذه

http://www.officena.net/ib/index.php?showtopic=4000&hl=

هذه فكرة أخرى

تم الإضافة على ملف الأخ جمال فايز مع الإعتذار الشديد عن التعدي على ملفك

tt.zip

إليك المثال

db1.zip

يتحقق ذلك بوجود علاقة بين الجدولين فثلا برقم للموظف . وتؤشر في العلاقة على تتالي الحذف

اعمل نموذج لإضافة الموظفين من الجدول الرئيسي . واعمل نموذج آخر مصدر بيانات الجدول الفرعي

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

أتمنى أن يكون هذا هو ما تريده

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

اتمنى لك التوفيق

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

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

اتمنى لك التوفيق

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

من ...... إلى .......

مع العلم أن العمر محسوب آليا عن طريق استعلام

وللجميع الشكر

السلام عليكم ورحمة الله

لدي بيانات موظفين من ضمنها عمر الموظف وذلك بحساب الفرق بين التاريخ الحالي وتاريخ الميلاد

سؤالي هو كيف اقوم بفرز بيانات الموظفين في النموذج الذين اكبر من 25 سنة واقل من 40 سنة مثلا

وللجميع الشكر

للرفع

تفضل هذا المثال

db1.rar

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

اشكرك اخي الكريم على مشاركتك

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

وعموما قمت بتطبيق كلامك وغيرت اسماء الحقول والجداول إلى الانجليزية ومازالت المشكلة قائمة .

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

لكم مني جزيل الشكر

اشكر اخي فهد على ردك .

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

اتمنى لك التوفيق في حل المشكلة

db1.rar

السلام عليكم

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

أرجو المساعدة ممن لديه حل لهذه المشكلة .

بقي ان اذكر أن معاينة التقرير ليس فيها أي مشكلة وعند الطباعة من المعاينة أو من التقرير مباشرة لا يكون هناك اي مشكلة .

المشكلة فقط عند الطباعة من النموذج