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

البحث في أعمدة متعددة تعرض على شكل checkbox

بدأه رحيّم في 15 مايو 2013 · 7 رد · 1,661 مشاهدة · في Microsoft Visual Basic.NET
بحثإختيارcheckboxمتعددةأعمدة
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

أساتذتي الأفاضل 

كنت عملت هذا الموضوع :

/index.php/topic/277232-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB-%D9%81%D9%8A-%D8%B9%D9%85%D9%88%D8%AF-bit-%D9%8A%D8%B9%D8%B1%D8%B6-%D8%B9%D9%84%D9%89-%D8%B4%D9%83%D9%84-checkbox/

وقد تفضل أستاذي : محمد فؤاد    بالإجابة عليه وتم غلق الموضوع

اليوم إحتجت لأن يكون البحث في عدد من الأعمدة ( bit ) في هذا الجدول 

وقد كان آخر ما توصلت إليه في الموضوع السابق هو الكود التالي ويعمل بشكل صحيح على شيك بوكس واحد فقط وهو :

Private Sub CheckBox1_CheckStateChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckStateChanged
        Select Case CheckBox1.CheckState
            Case CheckState.Indeterminate
                SQLDataSet1.Tables(0).DefaultView.RowFilter = ""
            Case CheckState.Checked
                SQLDataSet1.Tables(0).DefaultView.RowFilter = " Req_qui=" & 1
            Case CheckState.Unchecked
                SQLDataSet1.Tables(0).DefaultView.RowFilter = " Req_qui is null"
        End Select

    End Sub

 

والآن عند إضافة شيك بوكس 2  ليبحث في عمود آخر .. فإنه  يلغي عملية الفلترة في الشيك الأول ولا يعتبر لها أي اعتبار

 

مثلا : الشيك1   هل هو متزوج  

         الشيك2   هل يعمل

         الشيك3   هل يسافر

#2

جرب فكرة هذا الكود

DIM S AS STRING=" AND "
IF CheckBox1.CheckState=CheckState.Checked THEN S= S & "COL1=" & 1  
IF CheckBox2.CheckState=CheckState.Checked THEN S= S & "COL3='" & TEXTBOR1.TEXT & "'"
SQLDataSet1.Tables(0).DefaultView.RowFilter = S.SUBSTRING(5)

سبحانه الله وبحمده سبحانه الله العظيم

 
if (You Love ArabTeam2000 ) MessageBox.Show("All ArabTeam2000 Love You"); else MessageBox.Show("go to your mama");
 
Make it run, make it right, make it fast, make it small

normalize your data and don't make it look like excel sheet
 
الأبداع في الرأس والعلم في الكراس
روابط مفيدة
[دروس] تجاهل الwhere
طريقة الاضافة للجدولين مرتبطين مرة واحدة
قراءة صوره من مسار
حل مشكلة الارقام العربي في الكريستال ريبورت
حل مشكلة تصدير OLE Object الي Physical File مرة أخري
كود عمل نسخة يومية من قاعدة البيانات بتاريخ مع حذف النسخة السابقة من 30 يوم مضي
معظم دوال التعامل مع string
Change Data Capture
SQL Course
string-format-datetime
LINQ to SQL in C#
Sum-of-previous-row-values-in-SqlServer
alarm-for-stop-agent-service
SQL Server CTE
#3

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

تم تعديل هذه المشاركة بواسطة رحيّم في 16 مايو 2013 في 14:25

#4

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

جربتها بهذا الكود ( حيث أن العمودين من نوع bit ) 

DIM S AS STRING=" AND "
IF CheckBox1.CheckState=CheckState.Checked THEN S= S & "COL1=" & 1  
IF CheckBox2.CheckState=CheckState.Checked THEN S= S & "COL3=" & 1
SQLDataSet1.Tables(0).DefaultView.RowFilter = S.SUBSTRING(5)

 

ولكن عند التغيير مرتين أو أكثر تظهر الرسالة

Syntax error: Missing operand after ' col3' operator.

 

هل يمكنك شرح الكود السابق وأين الخطأ؟

#5 
COL1 or COL3 هي اسماء الحقل المراد الفرز عليها غيرها بما يناسبك

سبحانه الله وبحمده سبحانه الله العظيم

 
if (You Love ArabTeam2000 ) MessageBox.Show("All ArabTeam2000 Love You"); else MessageBox.Show("go to your mama");
 
Make it run, make it right, make it fast, make it small

normalize your data and don't make it look like excel sheet
 
الأبداع في الرأس والعلم في الكراس
روابط مفيدة
[دروس] تجاهل الwhere
طريقة الاضافة للجدولين مرتبطين مرة واحدة
قراءة صوره من مسار
حل مشكلة الارقام العربي في الكريستال ريبورت
حل مشكلة تصدير OLE Object الي Physical File مرة أخري
كود عمل نسخة يومية من قاعدة البيانات بتاريخ مع حذف النسخة السابقة من 30 يوم مضي
معظم دوال التعامل مع string
Change Data Capture
SQL Course
string-format-datetime
LINQ to SQL in C#
Sum-of-previous-row-values-in-SqlServer
alarm-for-stop-agent-service
SQL Server CTE
#6

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

نعم لقد عدلت ذلك سابقاً ( من أول مرة ) ولكن المشكلة هي فيما ذكرته في ردي السابق

#7

ارفق المشروع

سبحانه الله وبحمده سبحانه الله العظيم

 
if (You Love ArabTeam2000 ) MessageBox.Show("All ArabTeam2000 Love You"); else MessageBox.Show("go to your mama");
 
Make it run, make it right, make it fast, make it small

normalize your data and don't make it look like excel sheet
 
الأبداع في الرأس والعلم في الكراس
روابط مفيدة
[دروس] تجاهل الwhere
طريقة الاضافة للجدولين مرتبطين مرة واحدة
قراءة صوره من مسار
حل مشكلة الارقام العربي في الكريستال ريبورت
حل مشكلة تصدير OLE Object الي Physical File مرة أخري
كود عمل نسخة يومية من قاعدة البيانات بتاريخ مع حذف النسخة السابقة من 30 يوم مضي
معظم دوال التعامل مع string
Change Data Capture
SQL Course
string-format-datetime
LINQ to SQL in C#
Sum-of-previous-row-values-in-SqlServer
alarm-for-stop-agent-service
SQL Server CTE
#8

عفواً على التأخير

مرفق مثال المشروع  موضح داخله المطلوب

student1.rar

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