jjafferr

وهل انت متأكد من ان جميع السجلات في subform يجب ان تكون موجودة ، مثل ما هي في Main form ؟

لو تفضلت واعطيتنا رقم الـ code الذي ترى فيه الخطأ حتى نرى المشكلة، حيث ان البرنامج لا يبدو ان فيه شئ غير طبيعي :( شكرا جعفر

تفضل :) العمل كله في النموذج :) جعفر 1.Students.mdb.zip

أخي salit رجاء مطالعة هذا الرابط الخارجي: http://www.experts-exchange.com/Microsoft/Development/MS_Access/Q_21180634.html#a12633093 قبل حوالي 9 سنوات انا اقترحت حل مشابه لحلك ، ولما وُضع البرنامج على الشبكة صار البطئ في البرنامج ، وحل المشكلة كان بعمل جدول مؤق…

اود إضافة ملاحظة بسيطة للمعلومات التي شرحتها اختنا الفاضلة زهراء :) فعند قولها: > 7. يمكنك الان الحذف أ. فإنها لا تقصد حذف نص والذي بحذفه قد ينتج ظهور خطأ ، والذي لا يمكن معالجة الخطأ في البرنامج بصيغة mde ، وإنما يمكن حذف اي شئ آخر. ب. لهذا ، فبدل ان تحذف هذا…

أخي ابوساره 1. هناك عدة طرق لعمل اللي تريده ، لكن اللي عملته في الكود هي احد الطرق الصحيحة ، ولكن اذا كنت تشتغل على اكسس 2010 او اكثر ، فيمكنك في الجدول عمل خانة Calculated ، وتقوم بعمل المعادلة فيها ، اقرأ هذا الرابط لمزيد من المعلومات : http://allenbrowne.co…

أخي salit شكرا على هذه الكود الجميل :) ولكن يجب أخذ الحيطة وعدم إستخدامه في محيط شبكة (اي ان يكون هناك مجموعة من الاشخاص يشتغلون على نفس قاعدة البيانات ، وقاعدة البيانات موجودة على server) ، فإن هذا سيؤدي الى بطئ شديد في العمل للجميع ، لأن الكود يعمل فلتر (que…

حياك الله A&A :) أخي محمد: الافضل ان تعمل لك سؤال جديد بالعنوان المناسب ، حتى يستطيع جميع الإخوة في المنتدى رؤيته ، فسؤالك الآن مختبئ ولا يراه الكل لأنه تحت عنوان آخر :) على العموم ، وحسب علمي ، فهناك المقدار الضئيل الذي يمكن فعله وتغييره في mde ، وسيطلب منك ا…

ما هو السؤال ؟ يمكنك فتح اكثر من برنامج اكسس بالطريقة العادية، اما اذا كان برنامج s1 شغال ، واردت تشغيل s2 من زر في نموذج في s1 ، فالكود: Dim app As New Access.Application app.OpenCurrentDatabase "c:\S2.mdb" واذا كان برنامج s1 شغال ، واردت تشغيل نموذجsss فيالب…

المعادلة: DateDescription = Format(Date, "mmmm yyyy") DCount("[Description]", "TableDescription") ونتيجتها: Dcount=3 , DateDescription=April 2013 اما المعادلة: If DCount("[Description]", "TableDescription") = DateDescription Then فما ممكن ان المعادلتين تتساوى …

1. تضيف وتربط الجداول حتى نحصل على الخانات المطلوبة في الاستعلام، 2. اذا كانت القيم تتكرر ، فيجب استخدام Totals، 3. تضبط الفرز للخانات ، تصاعديا او تنازليا Sort Acecending or Decending، الى الآن وتظهر لنا جميع القيم من الجداول، اما اذا اردنا السيطرة على البيان…

انظر الى Row Source للـ Combo :)

حياك الله بيكو :) التواريخ الآن تُؤخذ من الجدول لذلك العامل + القسم :) فلا يمكنك إختيار تاريخ عشوائي ولا تظهر لك نتيجة في البحث :( ومع انه هناك طرق اخرى لضبط هذه التواريخ في Text ، إلا ان Combo هو الافضل ، حيث انك ترى التواريخ المتوفرة وتستطيع اختيار ما تريد ا…

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

اخي لوسمحت تعطينا مثال او رقم او الطريقة اللي نتوصل بها لنحصل على الرسالة:operation must use an updateable query جعفر

الله يسلمك اخوي عامر ويعافيك :)

وهذا البرنامج يقرأ جميع النماذج الموجودة ، ويحفظها في الـ Combo في الحدث عند فتح النموذج ، وهذا الكود: Private Sub cmd_Open_Click() DoCmd.OpenForm Me.cmb_Forms End Sub Sub AllForms() Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentProject M…

تفضل :) 27.program.accdb.zip

بالإضافة الى الكود السابق ، يجب عليك تفعيل احد الخاصيات للـ Combo6 وتجعلها نعم: جعفر بعد إدخالك الاسم ، اضغط على زر الكيبورد TAB حتى تكتمل عملية الادخال 26.Search.mdb.zip

اوﻻ آختار البحث بال id او اﻻسم ثم اختار اﻻسم او id