تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
البحث باكثر من معيار واحدهم التاريخ
#1
السلام عليكم
استخدمت خاصية ShowCheckBox فى الاداء DateTimePicker فى البحث ولكن عند تنشيط الخاصية او عدم تنشيطها يستخدمها فى البحث
واليكم الكود الدى استخدمته
ارجو التكرم بمساعدتى فى حل هده المشكلة وتصحيح الكود المرفق

PHP كود :
'1
        If ComboBox1.Text <> "" And ComboBox2.Text <> "" And ComboBox3.Text <> "" And DateTimePicker1.ShowCheckBox = True Then
            '
BindingSource1.Filter " tgroup1 like '%" a1 "%' And tsub like '%" a2 "%' and mntka like '%" a3 "%' and datepro >= '" a6 "' and datepro < '" a7 "' "
            
BindingSource1.Filter " tgroup1 like '%" a1 "%' And tsub like '%" a2 "%' and mntka like '%" a3 "%'and datepro >= '" a6 "' and datepro < '" a7 "' "
            
        
End If

        
'2
        If ComboBox1.Text <> "" And ComboBox2.Text <> "" And ComboBox3.Text <> "" And DateTimePicker1.ShowCheckBox = False Then
            BindingSource1.Filter = " tgroup1 like '
%" & a1 & "%' And tsub like '%" & a2 & "%'and mntka like '%" & a3 & "%'"

        End If

        '
3
        
If ComboBox1.Text <> "" And ComboBox2.Text <> "" And ComboBox3.Text "" And DateTimePicker1.ShowCheckBox False Then
            BindingSource1
.Filter " tgroup1 like '%" a1 "%'And tsub like '%" a2 "%'"

        
End If

        
'4
        If ComboBox1.Text <> "" And ComboBox2.Text = "" And ComboBox3.Text = "" And DateTimePicker1.ShowCheckBox = False Then
            '
BindingSource1.Filter " tgroup1 like '%" a1 "%'"
            
BindingSource1.Filter " tgroup1 like '%" a2 "%'"

        
End If

        
'5
        If ComboBox1.Text <> "" And ComboBox2.Text = "" And ComboBox3.Text <> "" And DateTimePicker1.ShowCheckBox = True Then

            BindingSource1.Filter = " tgroup1 like '
%" & a1 & "%'  and mntka like '%" & a3 & "%'and datepro >= '" & a6 & "' and datepro < '" & a7 & "' "

        End If

        '
6
        
If ComboBox1.Text "" And ComboBox2.Text <> "" And ComboBox3.Text <> "" And DateTimePicker1.ShowCheckBox True Then
            BindingSource1
.Filter " tsub like '%" a2 "%' and mntka like '%" a3 "%'and datepro >= '" a6 "' and datepro < '" a7 "' "

        
End If
       
        
'7
        If ComboBox1.Text = "" And ComboBox2.Text = "" And ComboBox3.Text <> "" And DateTimePicker1.ShowCheckBox = True Then
            BindingSource1.Filter = "  mntka like '
%" & a3 & "%'and datepro >= '" & a6 & "' and datepro < '" & a7 & "' "

        End If

        '
8
        
If ComboBox1.Text "" And ComboBox2.Text "" And ComboBox3.Text "" And DateTimePicker1.ShowCheckBox True Then
            
'BindingSource1.Filter = " tgroup1 like '%" & a1 & "%' And tsub like '%" & a2 & "%' and mntka like '%" & a3 & "%' and datepro >= '" & a6 & "' and datepro < '" & a7 & "' "
            BindingSource1.Filter = "  datepro >= '" & a6 & "' and datepro < '" & a7 & "' "

        End If

        '
9
        
If ComboBox1.Text "" And ComboBox2.Text <> "" And ComboBox3.Text "" And DateTimePicker1.ShowCheckBox False Then
            
'BindingSource1.Filter = " tgroup1 like '%" & a1 & "%' And tsub like '%" & a2 & "%' and mntka like '%" & a3 & "%' and datepro >= '" & a6 & "' and datepro < '" & a7 & "' "
            BindingSource1.Filter = "  tsub like '
%" & a2 & "%'"

        End If
        '
10
        
If ComboBox1.Text "" And ComboBox2.Text "" And ComboBox3.Text <> "" And DateTimePicker1.ShowCheckBox False Then
            BindingSource1
.Filter "  mntka like '%" a3 "%'"

        
End If
        
'11
        If ComboBox1.Text = "" And ComboBox2.Text = "" And ComboBox3.Text <> "" And DateTimePicker1.ShowCheckBox = False Then
            '
BindingSource1.Filter " tgroup1 like '%" a1 "%' And tsub like '%" a2 "%' and mntka like '%" a3 "%' and datepro >= '" a6 "' and datepro < '" a7 "' "
            
BindingSource1.Filter "  mntka like '%" a3 "%'"
            
qq 10
        End 
If

       
        
'12
        If ComboBox1.Text <> "" And ComboBox2.Text = "" And ComboBox3.Text = "" And DateTimePicker1.ShowCheckBox = True Then
            '
BindingSource1.Filter " tgroup1 like '%" a1 "%' And tsub like '%" a2 "%' and mntka like '%" a3 "%' and datepro >= '" a6 "' and datepro < '" a7 "' "
            
BindingSource1.Filter " tgroup1 like '%" a1 "%' and datepro >= '" a6 "' and datepro < '" a7 "' "
            
qq 12
        End 
If
        
'13
        If ComboBox1.Text = "" And ComboBox2.Text <> "" And ComboBox3.Text = "" And DateTimePicker1.ShowCheckBox = True Then
            '
BindingSource1.Filter " tgroup1 like '%" a1 "%' And tsub like '%" a2 "%' and mntka like '%" a3 "%' and datepro >= '" a6 "' and datepro < '" a7 "' "
            
BindingSource1.Filter " tgroup1 like '%" a1 "%' and datepro >= '" a6 "' and datepro < '" a7 "' "
            
qq 13
        End 
If
        
'14
        If ComboBox1.Text <> "" And ComboBox2.Text = "" And ComboBox3.Text <> "" And DateTimePicker1.ShowCheckBox = False Then
            '
BindingSource1.Filter " tgroup1 like '%" a1 "%' And tsub like '%" a2 "%' and mntka like '%" a3 "%' and datepro >= '" a6 "' and datepro < '" a7 "' "
            
BindingSource1.Filter " tgroup1 like '%" a1 "%'  and mntka like '%" a3 "%'"
            
qq 14
        End 
If
        
'15
        If ComboBox1.Text = "" And ComboBox2.Text = "" And ComboBox3.Text = "" And DateTimePicker1.ShowCheckBox = False Or qq = 0 Then
            MsgBox("          هذا البحث غير موجود", MsgBoxStyle.DefaultButton1, "منظومة        ا         ")

        End If 
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تغير التاريخ من ميلادي الى تقويم أم القرى aftfm 0 828 19-08-22, 03:48 AM
آخر رد: aftfm
  [سؤال] مشكلة اضافة التاريخ مع قاعدة بيانات alims 6 2,336 25-01-21, 02:45 AM
آخر رد: alims
  مشكلة في إظهار عمود التاريخ في داتا جريد فيو mofhmy 5 6,558 12-11-20, 12:13 PM
آخر رد: bahaa.elkomy@yahoo.com
  [VB.NET] البحث عن مسار مجلد ضمن قاعدة البيانات اكسس وفتحه من الفورم EMADSSS 1 2,270 21-02-19, 04:38 PM
آخر رد: elgokr
  (سؤال؟)كود اضافة التاريخ في قاعدة البيانات اسمهان 1 2,032 20-02-19, 11:08 AM
آخر رد: alfaiz678
  مشاكل التاريخ الهجري aftfm 3 2,560 05-04-18, 08:27 PM
آخر رد: aftfm
  مشكلة في كود البحث Search khaled12345 5 3,132 16-07-17, 08:22 PM
آخر رد: سعود
  [سؤال] استفسار عن كود البحث المتعدد Marwan9990 22 8,589 15-07-17, 11:51 AM
آخر رد: أبوبكر سويدان
  البحث في قاعدة البيانات مع تجاهل التشكيل waelalmsry75 16 8,463 03-07-17, 05:04 AM
آخر رد: K39
Sad [Acces2007] عاجل ارجو المساعدة لدي مشكلة مع برمجة زر البحث في الاكسس saimon 4 3,591 24-10-16, 07:54 PM
آخر رد: saimon

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم