الفرز والتصفية باستخدام RowSource SELECT

[kaser906]

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

بالمرفق مثال للأستاذ الكبير محمد طاهر

وهو عبارة عن فرز المدن حسب البلد

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

يتم فرز المدن بالكمبو بوكس الثاني الخاص بالمدن التابعه له

المثال رائع جدا

فقط يوجد به مشكله

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

ثم تذهب وتتنقل بين الكمبو بوكس الخاص بالمدن تجد انها تختفي

هل يمكن حل هذه المشكلة

 

CombocontiniousForm.rar

[kaser906]

up

[عبدالسلام ابوالعوافي]

Private Sub ComboCityID_AfterUpdate()
Me.Requery
End Sub

[kaser906]

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

والمشكلة بالمرفق انه عند تنقلك في حقل المدينة تجد ان النص يختفي عند التركيز GotFocus

 

Private Sub ComboCityID_GotFocus()
Me.ComboCityID.RowSource = "SELECT tblCities.lngCityID, tblCities.strCityName, tblCities.lngContID FROM tblCities WHERE (((tblCities.lngContID)=Forms!Frmlemployees!ComboContID)); "
SendKeys "{Enter}"

End Sub

 

[كرار صبري _ أبو جنى]

في ٨‏/٤‏/٢٠١٦ at 16:13, kaser906 said:

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

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

تفضل ... 

[kaser906]

18 ساعات مضت, كرار صبري _ أبو جنى said:

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

تفضل ... 

?????????????????????

[كرار صبري _ أبو جنى]

2 ساعات مضت, kaser906 said:

?????????????????????

آسف ... 

CombocontiniousForm2.rar

[kaser906]

الله يعطيك العافية أخي أبو جنى

أتمنى يكون الحل عن طريق الكود