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

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

قام بنشر

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

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

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

اعتقد ان الموضوع يتعلق بأمر 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