اذهب الي المحتوي
أوفيسنا

كيف اعمل قائمتين مترابطتين ؟


mojahedxp

الردود الموصى بها

فى النموذج اريد عمل قائمتين منسدلتين بحيث تتغير قيمة محتويات الثانية تبعا لتغير الاول

على سبيل المثال

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

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

رابط هذا التعليق
شارك

اخى فى الله اشكر بشدة

وادعو الله لك بالتوفيق والنجاح

ولكن يبدو ان هناك خطأ فكلما اخترت عنصرا ظهرت رسالة خطأ

الاعداد الذى ادخلته لهذه الخاصية غير صالح

ارجو الشرح والاصلاح وجزاك الله خيرا

رابط هذا التعليق
شارك

المثال صحيح

و لكن يجب عليك الترتيب , اي اختر أولا من القائمه f1 ثم من القائمة f2 و هكذا

اذا اخترت بغير هذا الترتيب سيظهر لك خطأ لأن كل قائمة تاليه تعتمد على مصدر سجلات القائمه التي تسبقها

رابط هذا التعليق
شارك

اخى فى الله اعتذر عن الاطالة

ولكنى طالب علم ومن الاساتذة استفيد واتعلم

فعلت كما قلت ولكن البرنامج يظهر لى رسالة خطأ ويغلق تمام

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

كى استفيد ويستفيد غيرى

حيث اننى لا استطيع حتى الان تعديله ليناسبنى

لاننى لا افهم ماهى بنيته الاساسية

وجزاك الله عنى وعن كل من يقرأ هذا الموضوع خيرا

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

رابط هذا التعليق
شارك

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

بعد اذن أخي العزيز رضوان

يبدو أن الخلل من الآكسس لديك

إذ أنه وبعد تشغيل البرنامج لم يظهر لدي أي خطأ

بل على العكس فإذا اخترت عكسيا أي اخترت f4 أولا ستظهر القائمة فارغة لأنه وبشكل منطقي يجب أن تتدرج في التسلسل من:

f1 ثم f2 ثم f3 ثم f4

جرب تشغيل البرنامج على جهاز آخر

وبالانتظار

رابط هذا التعليق
شارك

شرحا للمثال الأول

يوجد لديك جدول فيه أربعة حقول f1 , f2 , f3, f4

تم عمل النموذج و فيه أربعة مربعات تحرير و سرد

الأول f1 و يأخذ بياناته من الحقل f1

الثاني F2 و يأخذ بيانته من الحقل f2

و هذا كود الاختيار من القائمه الثانيه

SELECT DISTINCT Table1.f2 FROM Table1
و بهذه الحالة في حال فتح القائمه الثانيه ستظهر جميع حقول f2 و بما أن القائمة الأولى يفترض أن تصفي القائمه الثانيه , لذلك تم وضع شرط أننا نريد فقط السجلات من القائمه الثانيه المساويه لمثيلها في القائمه الأولى و تم اضافة الشرط التالي لكود الاختيار
SELECT DISTINCT Table1.f2 FROM Table1 WHERE (((Table1.f1)=[Forms]![Form1]![Combo1]));

و بهذا الشرط سيتم حصر سجلات القائمه الثانيه بما تم اختياره من القائمه الأولى

تم تعديل بواسطه rudwan
رابط هذا التعليق
شارك

الاخ العزيز رضوان والاخ الغالى التقنى اشكركم فى الله شكرا كثيرا على مساعدتى

فمثال الاخ التقنى يعمل بحمد الله تعالى جيدا

اما بالنسبة لشرح اخى فى الله رضوان للمثال فجزاه الله عنى خيرا

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

وغفر الله لنا جميعا ذنوبنا واوردنا الجنة باذن الله

رابط هذا التعليق
شارك

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

أخي الكريم

المثال الذي أرفقته لك ليس من صنع يدي

والشكر موصول لصاحبه الأصلي ( الذي لم أتمكن من معرفته )

وبالتوفيق

تم تعديل بواسطه التقني
رابط هذا التعليق
شارك

Private Sub Combo1_AfterUpdate()
Me.Combo2 = ""
Me.Combo3 = ""
Me.Combo4 = ""
Me.Combo2.Requery
End Sub

حتى لايتظهر رسالة خطأ في تصفية القائمه , لابد أن تكون قيم القوائم الثانيه فارغه

على سيبل المثال لو قمت باختيار قيمه من القائمة الأولى , ثم قيمه من القائمة الثانيه

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

وا لسطر الأخير يعيد تحديث و تشغيل القائمه الثانيه اعتمادا على القيمه الجديده للقائمه الأولى

رابط هذا التعليق
شارك

اخى فى الله التقنى

جزاك الله عنى خير الجزاء

واشكرك فى الله شكرا كثيرا

فقد علمت الخطا وتعلمت الصواب على يديك

فجزاك الله عنى خير الجزاك

وباعد الله بينك وبين خطاياك كما باعد بين المشرق والمغرب

ونقاك من خطاياك كما ينقى الثوب الابيض من الدنس

وغسلك من خطاياك بالماء والثلج والبرد

انت واخىالكريم " رضوان "

وكل من ساهم فى هذا المنتدى

اللهم امين

وشكرا

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information