:و: الفلترة المتكررة بواسطة قوائم الاختيار Combox

[seme1]

لدي قاعدة بيانات مكوناتها كالتالي:

الاسم بالكامل

الاسم الأول

أول حرف من الاسم الأول

عملت نموذج به قائمتي اختيار (ComboBoxes) ومربع نص

المطلوب:

قائمة الاختيار الأولة تحتوي على قيم الحقل أول حرف ,, وقائمة الاختيار الثانية تحوي قيم (الاسم الأول) فقط التي تماثل الحرف الأول الذي تم اختياره في القائمة الثانية

مربع النص يحو الأسماء التي تطابق الخيارين الذين اختيرا في قائمتي الاختيار .

المشكلة أنه بعد الاختيار من القائمة الأولى ثم محاولة الاختيار من القائمة الثانية تظهر رسالة الفلترة معنوة بالحرف الذي تم اختياره بالقائمة الأولى !!

الملف ههنا :

http://www.officena.net/ib/index.php?showtopic=6267

وهذا هو الكود الذي وضعته للقائمة الأولى:

Private Sub Combo3_AfterUpdate()
 Dim SQLq, temp As String

    SQLq = "Select NamesAndInitials.FirstName"
    SQLq = SQLq & " From NamesAndInitials"
    temp = Combo3.SelText
    ' I also tried temp = Me!Combo3        with no luck           :( 
    SQLq = SQLq & " Where Initial = " & temp & ";"
    MsgBox SQLq
    Me!Combo5.RowSourceType = "Table/Query"
    Me!Combo5.RowSource = SQLq
    
End Sub

تم ارفاق المثال من القسم المؤقت للمرفقات و تنسيق الكود أعلاه بواسطة المشرف التقني .

Testing_Filters.rar

تم تعديل أكتوبر 20, 2006 بواسطه التقني

[seme1]

عرفت الحل ,,

نسيت وضع ال ' حول الtemp