ابو البشر

ممكن توضح اكثر ولو ترفق مثال افض لفهم المطلوب

جزاك الله خير أخي @أبو إبراهيم الغامدي بارك الله فيك ....

هل مدخلات برنامج يختلف عن هذا مثال 2.accdb

طبق ما في الصورة على الاستعلام

هل هذا الحل مناسبك لبرنامجك .....

انظر الاستعلام1 مثال (11).accdb

هل هذه هي الصورة المطلوبة

ممكن تستخدم هذا التحايل ..... شغل التقرير وضع رقم 1 Footer.mdb

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

الملف موجود ويعمل الكود .... انظر النموذج كما في الصورة وموقع الكود

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

جاري التجربة .... جزاك الله خيرا ...... اشكرك أخي الكريم ..... فكرة بديله تستحق التجربة

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

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

استاذ @jjafferr ممكن اجراء ذلك ام لا ؟؟ يهمني اسمع رايك ؟ او اصرف النظر عن الطريقة

ضع هذا الكود تحت حدث الزر If DLookup("nam", "nam", "[nam] = '" & Me.tt & "'") = Me.tt Then MsgBox "هذا الاسم موجود مسبقا" 'DoCmd.Close End If

السلام عليكم

تفضل ..... Me.an = Me.القائمة27.Column(1) Me.an1 = Me.القائمة27.Column(2) Me.an2 = Me.القائمة27.Column(3) Dim db As DAO.Database Dim rs As Recordset Set db = CurrentDb Set rs = db.OpenRecordset("my_q") rs.AddNew rs!a = Me.القائمة27.Column(1) rs!b = Me.القائمة27.Column(2) rs!c = Me.القائمة27.Column(3) rs!h = Me.المعرف rs.Update rs.Close Set rs = Nothing DoCmd.SetWarnings False DoCmd.RunSQL "DELETE w.q, w.w, w.e FROM w WHERE (((w.q)=[forms]![my_z]![an]) AND ((w.w)=[forms]![my_z]![an1]) AND ((w.e)=[forms]![my_z]![an2]));" DoCmd.SetWarnings True MsgBox "تم اضافة البيانات", vbInformation DoCmd.Requery استخدمنا هذا الكود .... test (12).accdb

تفضل ..... انظر AutoLogout.accdb

اضف فرز حسب كود اللجنه للتقرير فقط ...

السلام عليكم ورحمة الله وبركاته الاخوة الزملاء في منتدانا الحبيب لدى البرنامج المرفق خاص باعطاء مهلة للمستخدمين للبرنامج وذلك قبل اغلاق البرنامج ... حيث يتم اعلامهم عن طريق اشعارات الويندوز بدلا من رسائل الاكسس ( والسبب في استخدام هذه الاشعارات لانها تبنه المستخدم بالاشعار حتى وان كان قد قام بتصغير البرنامج ..... السؤال : هل يمكن عند الضغط على الاشعار من المستخدم أن يفتح الاكسس على نموذج اخر مثلا frm_main بدلا من النموذج المفتوح سلفا ..... اي توجيه الاشعار للقيام بمهمة محدده في البرنامج ؟؟؟ بارك الله فيكم . AutoLogout.accdb

تفضل .... Month now sum.accdb

تفضل ... المأموريات - 001.accdb

البرنامج شغال ....

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