الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

الربط بين السجلات بواسطة List Box

بدأه o9oooo9o في 31 ديسمبر 2009 · 12 رد · 1,227 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الاخوة الزملاء

كل عام وانتم بخير

لدي طلبين وارجو مساعدتي...

الطلب الاول:

عند فتح نموذج1 والاختيار من List Box نفترض العميل محمد يقوم بعده بفتح نموذج2 على نفس سجل العميل محمد.

الطلب الثاني

ارغب بعمل فلترة للاجابة في نموج1 يعني لو قمت بالتاشير على الاجابة ( نعم ) يقوم بعرض ( نعم ) في List Box ولو قمت بالتاشير على الاجابة ( لا ) يقوم بعرض ( لا ) في List Box

ولو قمت بالتاشير على الاجابة ( الكل ) يقوم بعرض ( نعم و لا ) في List Box

وتقبلو فائق التحية والتقدير.....

db2222rar.rar

تم تعديل هذه المشاركة بواسطة o9oooo9o في 31 ديسمبر 2009 في 21:49

d14.gif
#2

السلام عليكم ورحمة الله وبركاته

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

وبالتوفيق

koao_db11.zip

1

اللهم صلي على محمد وعلى آل محمد كما صليت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

وبارك على محمد وعلى آل محمد كما باركت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

#3
koao كتب:

السلام عليكم ورحمة الله وبركاته

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

وبالتوفيق

شكراً استاذ koao

وجزاك الله خير

d14.gif
#4

الاخوة الزملاء

كل عام وانتم بخير

هل يمكنني عمل فلترة للاجابة في نموج1 في حالة عدم وجود اجابة يعني يعرضلي سجلات الاجابات الفارغة

وتقبلو فائق التحية والتقدير.....

koao_db11.rar

تم تعديل هذه المشاركة بواسطة o9oooo9o في 1 يناير 2010 في 15:17

d14.gif
#5

الزيادة على الكود السابق

Case 4

    Select Case Me!GBox.Value
        Case 1
            Me!LBox.RowSource = "SELECT [CostName], [Answer] FROM Mytable where [Answer]='نعم'"
        Case 2
            Me!LBox.RowSource = "SELECT [CostName], [Answer] FROM Mytable where [Answer]='لا'"
        Case 3
            Me!LBox.RowSource = "SELECT [CostName], [Answer] FROM Mytable"
        Case 4
            Me!LBox.RowSource = "SELECT [CostName], [Answer] FROM Mytable where (((Mytable.Answer) Is Null));"
    End Select
    Me!LBox.Requery

وفق الله الجميع

تم تعديل هذه المشاركة بواسطة قــاهــر الآكــسـس في 1 يناير 2010 في 15:44

1
#6
قــاهــر الآكــسـس كتب:

الزيادة على الكود السابق

Case 4

    Select Case Me!GBox.Value
        Case 1
            Me!LBox.RowSource = "SELECT [CostName], [Answer] FROM Mytable where [Answer]='نعم'"
        Case 2
            Me!LBox.RowSource = "SELECT [CostName], [Answer] FROM Mytable where [Answer]='لا'"
        Case 3
            Me!LBox.RowSource = "SELECT [CostName], [Answer] FROM Mytable"
        Case 4
            Me!LBox.RowSource = "SELECT [CostName], [Answer] FROM Mytable where (((Mytable.Answer) Is Null));"
    End Select
    Me!LBox.Requery

وفق الله الجميع

شكراً لك استاذي / قاهر الاكسس

وجزاك الله خير.........

d14.gif
#7

الاخوة الزملاء

كل عام وانتم بخير

هل يمكنني معرفة عدد السجلات في List Box بناءاً على فلترة الاجابة في نموج1 .

وتقبلو فائق التحية والتقدير.....

koao_db11.rar

d14.gif
#8

السلام عليكم ورحمة الله وبركاته

تفضل أخي الكريم

koao_db11.zip

1

اللهم صلي على محمد وعلى آل محمد كما صليت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

وبارك على محمد وعلى آل محمد كما باركت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

#9

الاخوة الزملاء

كل عام وانتم بخير

عندما اقوم بفتح النموذج الذي قام بتعديله الاستاذ / koao والاستاذ / قاهر الاكسس وفقهم الله والموضح اعلاه اجد ان دائما الاجابه موشرة على ( الكل ) كيف يمكنني ان اقوم بنقل التركيز الى الاجابة ( نعم ) بحيث عندما اقوم بفتح النموذج اجد ان الخانة موشرة على الاجابة ( نعم ) ارجو ان يتم الشرح لكيفية نقل التركيز لكي استفيد.

وتقبلو فائق التحية والتقدير.....

d14.gif
#10

السلام عليكم ورحمة الله وبركاته

أخي الكريم ... لتفعل ذلك غير خاصية "القيمة الإفتراضية" "Default Value" لمجموعة الخيار GBox من 3 إلى 1

كما في الصورة التالية

post-43910-12628271088752_thumb.gif

وبالتوفيق

1

اللهم صلي على محمد وعلى آل محمد كما صليت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

وبارك على محمد وعلى آل محمد كما باركت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

#11
koao كتب:

السلام عليكم ورحمة الله وبركاته

أخي الكريم ... لتفعل ذلك غير خاصية "القيمة الإفتراضية" "Default Value" لمجموعة الخيار GBox من 3 إلى 1

كما في الصورة التالية

post-43910-12628271088752_thumb.gif

وبالتوفيق

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

وشكراً

1.rar

d14.gif
#12

السلام عليكم ورحمة الله وبركاته

أخي الكريم أنا شرحت لك الطريقة ... ولكن يبدو أني لم أوفق للشرح الوافي ... عموما التغيير تم في المرفق التالي

وبالتوفيق

koao_db11111.zip

اللهم صلي على محمد وعلى آل محمد كما صليت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

وبارك على محمد وعلى آل محمد كما باركت على إبراهيم وعلى آل إبراهيم إنك حميد مجيد

#13
koao كتب:

السلام عليكم ورحمة الله وبركاته

أخي الكريم أنا شرحت لك الطريقة ... ولكن يبدو أني لم أوفق للشرح الوافي ... عموما التغيير تم في المرفق التالي

وبالتوفيق

استاذ / koao

بالعكس كان شرحك كاافي و وافي.

شكراً لك وجزاك الله خير.

d14.gif

مواضيع مشابهة