ابو جودي

اضف ايضا تلك الطريقة المتواضعة الى مكتبتك

تنفضل ان شاء الله فى هذا الموضوع تجد ما يسرك

بعد اذن استاذى العزيز ومعلمى القدير الاستاذ @kanory شوف يا دكتور @الحلبي علشـــــــان انا بس بحــــــــبك الاستاذ القدير كنورى حول استعلام التحديث فى المرفق بتاعى بس لكود سيكوال علشان تقدر تستخدمه فى كل النماذج من محرر الاكواد -- طيب ليه حصل مشكلة معاك لان اكيد مربح الاحتيار مش موجود فى النموذج شوف اول مرفق لى للنموذج فى وضع التصميم تجد مربع اختيار مخفى --------- طيب حابب تحول استعلام التحديث لكود داخل روتين عام يستخدم مع اى جدول حتى لو غيرت اسم الجدول او حتى غيرت اسماء الحقول فى الجدول ومع اى نموذج وتنادى عليه لتستخدمه فى زوايا التطبيق اتفضل يا دكتور اعمل موديول وقم بوضع الاسطر الاتية Public Function GoOnUpdatChkBox(ByVal strTableName As String, ByVal strFieldNameUbdt As String, ByVal strFieldNameWher As String, ByVal strXuser As String, ByVal strUpdatChkBox As String) CurrentDb.Execute "UPDATE [" & strTableName & "] SET [" & strTableName & "].[" & strFieldNameUbdt & "] = '" & strUpdatChkBox & "' WHERE [" & strFieldNameWher & "] = '" & strXuser & "' ;" strTableName = vbNullString strFieldNameUbdt = vbNullString strFieldNameWher = vbNullString strXuser = vbNullString strUpdatChkBox = vbNullString End Function وفى النموذج ضع الكود الاتى على زر الامر تفعيل Call GoOnUpdatChkBox("t2", "yesno", "xuser", Me.xuser, -1) Me.t2_subform.Requery ولزر الامر الغاء التفعيل بس غير فى الكود السابق قيمة -1 الى 0 اى خدمه يا دكتور والطريقة دى من وجهة نظرى افضل من طريقة اللوب ------------------------------- طيب مش حاب الكود فى الموديول يكون روتين عام وحابب تستخدمة بطريقة مباشرة باسم الجدول والحقول كما هى استخدم الكود الاتى فى الموديول بدلا من السابق Public Function GoOnUpdatChkBox(ByVal strXuser As String, ByVal strUpdatChkBox As String) CurrentDb.Execute "UPDATE t2 SET t2.yesno = '" & strUpdatChkBox & "' WHERE (xuser = '" & strXuser & "');" strXuser = vbNullString strUpdatChkBox = vbNullString End Function وفى النموذج ضع الكود الاتى على زر الامر تفعيل Call GoOnUpdatChkBox(Me.xuser, -1) Me.t2_subform.Requery ولزر الامر الغاء التفعيل بس غير فى الكود السابق قيمة -1 الى 0 المرفق الى يوضح الافكار بالطرق الثلاث خانة الاختيار - 5.accdb

وهاد المرفق تعديل طفيف لتقليل الكود المستخدم بالنموذج خانة الاختيار - 4.accdb

اتفضل يا دكتور خانة الاختيار - 3.accdb

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

اتفضل ابسط حل خانة الاختيار - 2.accdb

يعنى رجاء وفضلا وكرما وليس امر تسهل على من يريد مساعدتك بوضع مرفق على الاقل

راجع المشاركة ان شاء الله بها طلبك

حتى يكون الموضوع مرجع متكامل لمن اراد فيما بعد المرفق الاتى فقط قم باستيراد النموذج frmRestTable الى قاعد بياناتك وسوف تقوم فقط باختيار الجداول التى تريد تفريغ القيم منها تمام سواء كانت جداول بنفس القاعدة او جداول مرتبطة بقاعدة خلفية دون اى عناء او كتابة اى اكواد Reset Select Table.mdb

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

ممكن مرفق وشرح مفصل لو تكرمت

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

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

العفو منكم استاذى الجليل ومعلمى القدير ... اذا حضر الماء بطل التيمم

طيب بص اولا انا لم اقم بعمل فلتر على النموذج حتى افتح التقرير يكفينى فقط الوقوف على السنة المراد عمل الفلتر لها والضغط على زر الامر لفتح التقرير ولانى الان لا املك طابعة هذا هو المخرج بعد استخدام طابعة pdf وطبعا وجب التنبيه لانى تسرعت ان كان الفلتر متعدد لاكثر من قيمة لن تعمل تلك الطريقة ولذلك طريقة استاذى الجليل ومعلمى الاستاذ @kanory افضل اجابة Filters.pdf

اتفضل New.accdb

أشهد الله تعالى انى احبكم فى الله ولله

ههههههه وانا الان صيرت احك راسى انت الدكتور حلبى اثيت لى انك انت انت لتكون انت مو انت هاهاهاهاهاها وبعدين لما احب اخاطب حد من شعب مصر اخاطب مين فيكم دكتور حلبى واللا الدكتور الحلبى

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

طيب سوف اقوم ببناء تشغيل الصوت على طريقتى.. ابشر

جزاكم الله خيرا ولكن فى انتظار ردكم بعد التجربة استاذى الجليل واحقاق للحق 1- حمل الملفات داخل القاعدة مقتبس من معلمى واستاذى الجليل الاستاذ @jjafferr 2- تشغيل وسائط الـ MP3 , WAV من معلمى واستاذى الجليل دكتور @SEMO.Pa3x جزاهم الله خيـرا يعنى كل الفضل لله سبحانه وتعالى ثم لاساتذتى بارك الله فى اعمارهم واحسن اليهم وشكر لهم كما يحسنون الينا

وما العجيب هنا

السلام عليكم ورحمة الله تعالى وبركاته حياكم الله اخوانى واحبابى بناء على موضوع : فتح نموذج بناء على اوقات مختلفه اخى الحبيب استاذ @TQTHAMI اهديكم وكل احبابى هذا التطبيق 1- ملفات الاذن محموله داخل القاعدة 2- عند فتح التطبيق يتم انشاء مجلدات اليا فى نفس مسار التطبيق 3- يتم تفريغ الملفات الصوتية والصورة بداخل المجلدات 4- امكانية تعديل الوقت لكل صلاة 5- فتح نموذج تنبيه وقت الاذان مع الاستماع للاذان 6- اغلاق النموذج الخاص بالتنبيه والاذان اليا بعد الانتهاء لصوت الاذان Prayer.mdb

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