ابوخليل

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

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

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

تفضل schoolالغياب.rar

انت تريد طباعة كشف لرصد الغياب اذا العنوان غير صحيح انتظرني .. سوف اعدل العنوان واوافيك بمطلوبك

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

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

الخطأ موجود في الاستعلام .. في العلاقة بين الجدولين : جدول المعلمين وجدول Link ... في جدول المعلمين اربط بـــ آيدي المعلم وليس اسم المعلم ------------------------------------------------------------------ ولكن المرفق ناقص 1- تريد اظهار غياب .. والجداول لم يرصد فيها غياب 2- حقل التاريخ ؟؟ لايوجد تاريخ اصلا في الاستعلام تأكد من المرفق وراجع ملاحظاتي

هو التقرير مجاميع فعلا .. هذه لم افهمها !!

الموضوع قديم من شهور مضت ضع استشارتك في عنوان وموضوع جديد .. واخوانك هنا لن يألوا جهدا في مساعدتك

العمل الذي تم في الموضوع السابق كان متقنا عند تغيير الجداول والمسميات يختلف الأمر .. وكأنك بدأت التصميم من أول وجديد .. وهذا تفسير فشل محاولتك ومثلك انا اتعب كثيرا حتى ارجع الامور في نصابها دوما انا اتبع طريقة في التصميم .. وهي انه يكون لدي قالب خاص بكل نوع من انواع المشاريع المشاريع المالية او المشتريات والمبيعات او الخدمات والافراد او البرامج المدرسية ، او العسكرية ... الخ عند بداية المشروع اسحب الجداول من القالب .. وقد يتبعه سحب الكثير من النماذج والتقارير وايضا الوحدات النمطية تكون مبنية غالبا على هذه التسميات. وهذ يختصر علي 70% من الجهد والوقت في المشروع الجديد . حاول ان تهتم بان يكون لك قالب معتمد لكل نوع من انواع المشاريع _____------------------------------------------------------------------------------------------ تم تعديل مرفقك حسب الكائنات الجديدة التي ادرجتها آمل ان تتمكن من اكمال مشروعك Data20.rar

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

راجع معلوماتك .. بل هي اشهر كلمة محجوزة . ليس في اكسس فقط

عادة الطبيب لا يصف العلاج الا بعد الكشف على المريض وفحصه حسب فهمي ان النموذج عندك بدون مصدر بيانات .. اي بدون جدول اذا بدون جدول والحقول غير منضمة يمكنك كتابة اسماء جميع الحقول في حدث الزر .. كما وضحت لك اعلاه أي : text1= Null text2= Null text3= Null وهكذا ... اما اذا الحقول منضمة ومصدرها الجدول فيمكنك حذق السجل كامل من الجدول باستخدام هذا السطر في الحدث بدلا من الحقول DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 أو DoCmd.SetWarnings False DoCmd.RunSQL "delete * from table1 " DoCmd.SetWarnings True ' table1 هو اسم الجدول عندك

نعم يوجد على اعتبار اسم الحقل : text1 حدث النقر على الزر سيكون مثل هذا text1 = Null أو text1 = ""

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

عجيب !! البحث من خلال 13 حقل هل تتخيل ان جميع حقولك يمكنك البحث فيها من خلال حقل واحد على كل حال .. كلٌُ بفكره راضي تفضل تم تحقيق طلبك abc2.rar

اهلا ابو مشعل @iibat لو رفعت مرفقا يحتوي على الجدول مع بعض البيانات والاستعلام والنموذج الذي يتم البحث منه حتى تكون المعالجة عن قرب او ربما نجد لك طريقة بحث افضل

الموضوع قديم اكتب طلبك بعنوان جديد .. ويمكنك الاشارة الى رابط هذا الموضوع

الموضوع قديم اكتب طلبك بعنوان جديد .. ويمكنك الاشارة الى رابط هذا الموضوع

انا اردت ان تأخذ الفكرة والتي هي استخدام مربع تص بدلا من صندوق الرسالة وتعديل بسيط على كود الأستاذ القدير أزهر لتحويل الصندوق الى حقل يتحقق المطلوب On Error GoTo Err_Dell_Click_Error If Me.TextPass.Visible = False Then Me.TextPass.Visible = True Beep MsgBox "ادخل كلمة المرور", vbOKOnly, _ "Important Information" Exit Sub End If If Me.TextPass = "12345" Then DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdDeleteRecord Me.TextPass.Visible = False MsgBox "تم الحذف", vbOKOnly, _ "Important Information" Else Beep MsgBox "ليس لك الحق بالوصول", vbOKOnly, _ "Important Information" Me.TextPass.Visible = False Exit Sub End If Exit_Err_Dell: Exit Sub Err_Dell_Click_Error: If Err.Number = 2001 Then Resume Exit_Err_Dell End If base_pass.rar

طيب على راحتك نحن نتعلم .. لنتجاوز أخطاءنا .. ونطبق الطرق السليمة كي نطور انفسنا كتابة الحقول بحروف عربية ستتعبك كثيرا ويصعب عليك التعلم .. تفضل : تم تحقيق طلبك كما تريده بالضبط من دون اي تعديلات على المرفق.. If Me.TXT = "مقيم" Then Me.Form.Filter = "مقيم like '" & "نعم" & "'" Me.Form.FilterOn = True ElseIf Me.TXT = "لديه كفيل" Then Me.Form.Filter = "[لديه كفالة] like '" & "نعم" & "'" Me.Form.FilterOn = True ElseIf Me.TXT = "لديه اقامة" Then Me.Form.Filter = "[لديه اقامة] like '" & "نعم" & "'" Me.Form.FilterOn = True End If test4.rar

تمام اللي عملته لك في المرفق السابق شيء ضمن خصائص الحقل بما يسمى قاعدة التحقق من الصحة .. اذا ما يساوي 14 رقم اصلا لا يدرج تاريخ الميلاد وانما يقف الحدث حتى يصحح الرقم . على كل حال تم تحقيق طلبك كما تحب اما بالنسبة لــــ : فالتعديل تم على الحدث : Private Sub cartno_AfterUpdate() طبعا الكود يقارن بين تاريخ الميلاد وتاريخ اليوم والكود كان يأخذ تاريخ اليوم من حقل غير منضم على النموذج قيمته = Date() وهذا يادكتور ينطبق عليه المثل : وين ودنك يا جحا فأنا قطعت اذن جحا ووضعت دالة التاريخ مباشرة داخل الكود الخطأ الذي وقعت فيه هو وجود حقل على النموذج باسم BrDate وهذا الاسم هو اسم الدالة في محرر الفيجوال وهذا تعارض كبير .. يتوقف الكود ولا يعمل راجع مثالك في اول مشاركة وسيتضح لك الاشكال . الرقم القومى3.rar

موجود في المثال المرفوع .. انا عملته لك

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