عبد الفتاح كيرة

أعتقد هذا أجدى و أنفع

هذا موضوع قيم جدا صارت عندنا أرصدة من الحلول الجزئية و الكلية وفقكم الله

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

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

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

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

و ما الفرق النتيجة واحدة التحديث معناه تغيير فى قيمة حقل أو أكثر من الحقول (الموجودة)

الكود يعمل بكفاءة بشرطين @ابوخليل الأول : أن تكون آخر سنتين متتابعتين و إلا لن يجد القيمة الموجودة فى الاقتباس الثانى : ألا يكون للموظف تقرير واحد و هذا وارد (موظف جديد)

عليكم السلام جعلت معرف الرسالة فى الجدول المحدث مفتاحا أساسيا كى لا يتكرر إلحاق نفس الرسالة كود نحديث جدول.rar

أخى @jjafferr لم أحصل على إجابة على هذا السؤال دالة int للحصول على الرقم الصحيح من رقم به أرقام عشرية مثلا 23.265 تعطينا 23 وفقكم الله

سؤال للأستاذ @jjafferr لماذا استخدمت دالة int هنا مع أن الرقم صحيح وقد تم تحويل النث إلى رقم باستخدام val و شكرا لكم و حبذا لو شرحت لنا ما تم بعد ذلك من ربط الاستعلامات وفقكم الله

وفقك الله جارى التنزيل و الدراسة

المطلوب السنتان الأخيرتان أيا كانا يتغير ذلك سنويا و مع ذلك فقد توصلت لحل بسيط جدا يتطلب إضافة واحدة و هى حقل فى جدول REPORT يسجل فيه رقم تقرير الموظف يعنى رقم داخلى غير الرقم العام المسلسل كما بالصورة بعد ذلك نستخدم هذا الحقل فى شرط فى استعلام التحديث DLookUp("[REP]";"REPORT";"[EMP_ID]=" & [EMP_ID] & "AND [EMP_TAQNO]=" & DCount("[EMP_ID]";"REPORT";"[EMP_ID]=" & [EMP_ID])) و مفادها البحث عن القيمة فى حقل REP بالجدول REPORT بحيث أولا : تساوى رقم الموظف ثانيا : رقم تقرير الموظف = عدد تقاريره التى حصل عليها (هذا لتقرير العام الحالى و عدد تقارير الموظف -1 و هذا لتقرير العام السابق و نبتعد عن التواريخ غير المنضبطة هاكم الملف بعد التعديل 655keraFINAL.db1.rar وشكرا لتعاونكم

المرفق مختلف عن الملف فى أول مشاركة

أنت لها أنت لها @shivan باقى استعلام تحديث للجدول employees

المطلوب أحدث سجلين اثنين

نعم أدرك أن هذا ليس هو المطلوب لكن قد يحتاجه آخرون أما الحصول على آخر سجل (سجل واحد) فهو مطلب معتاد أما الحصول على أحدث سجلين فقد بحثت كثيرا عنه فلم أجده و أتمنى أن يتحفنا أستاذنا جعفر بما لديه فيكون هذا إنجازا عظيما وفقكم الله لدينا حالة مشابهة هى جدول درجات الموظف يسجل فيه الدرجات الوظيفية التى حصل عليها و كل درجة بتاريخ و نريد جلب آخر درجتين إلى جدول بيانات الموظف حيث يطلب دائما الدرجة الحالية الدرجة السابقة

جزاك الله خيرا ذكرتنى ببرنامج لى قديم استخدمت فيه هذه الملفات أو مثلها Holy_Quran.rar

افترضت - على غير المطلوب- أن المطلوب سنتان محددتان هما 1916 - 1917 و هذا المرفق ربما يحتاجه أحد غير الأخت السائلة 655kera.db1.rar

هل هذه النتيجة صحيحة

شكرا للإفادة جربت هذا و نجح معى If IsNull(Me.txtProject) Then Me.subRealisation.Form.Filter = "" Me.subRealisation.Form.FilterOn = False Else Me.subRealisation.Form.Filter = "[Project]= '" & Me.txtProject & "'and Repères ='" & Me.txtMarkItem & "'" Me.subRealisation.Form.FilterOn = True End If ضعه فى حدث بعد التحديث لكل من xtProject txtMarkItem

@Shivan Rekany شكرا لك

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

السلام عليكم مازلنا نتعلم فى أركان هذا الصرح التعليمي جزى الله خيرا القائمين عليه ما الفرق بين DoCmd.RunCommand acCmdFind و DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70 لتنفيذ أمر واحد و هو فتح نافذة البحث فى أكسيس هل هناك ميزة لاستخدام runcommand بثوابتها الكثيرة وفقكم الله رأيت بعض البرامج معظم أكوادها ب runcommand هذا موقع متخصص فقط فى ثوابت و أكواد runcommand http://access.mvps.org/access/RunCommand/list/listf.htm و جزاكم الله خيرا

ضع شرطك بجوار =Do Until yourfield