منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

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

عندي مشكلة مع البحث بين تاريخين

أستخدمت كودين كلها تعطيني نفس النتيجة عند الظغط على زر البحث يتم تحديث DataGridView وتصبح فاضية علماً قبل الضغط على زر لبحث تكون DataGridView مملوئه بالبيانات ومن ضمنها التاريخ

أستخدم قاعدة بينات اكسس

هذا الكود الاول

PHP كود :

zarsw.Clear()

        Dim d1, d2 As String
        d1 = Format(Me.DateTimePicker1.Value, "yyyy/MM/dd")
        d2 = Format(Me.DateTimePicker2.Value, "yyyy/MM/dd")


        dazarsw = New OleDbDataAdapter("Select * From [zarsw] Where [تاريخ الدخول] between #" & d1 & "# and #" & d2 & "#", co)
        dazarsw.Fill(zarsw)
        DataGridView1.DataSource = zarsw 

وهذا الثاني

PHP كود :

  zarsw.Clear()


        dazarsw = New OleDbDataAdapter("Select * From [zarsw] Where [تاريخ الدخول] between #" & DateTimePicker1.Value & "# and #" & DateTimePicker2.Value & "#", co)
        dazarsw.Fill(zarsw)
        DataGridView1.DataSource = zarsw 

أتمنى اجد الحل لديكم
وشكراً

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

أخي جميل

هذا تعديل للكود

PHP كود :

dazarsw = New OleDbDataAdapter("Select * From [zarsw] Where [تاريخ الدخول] between @d1 and @d2 ", co)
dazarsw.SelectCommand.Parameters.AddWithValue("@d1", Me.DateTimePicker1.Value.Date)
dazarsw.SelectCommand.Parameters.AddWithValue("@d2", Me.DateTimePicker2.Value.Date) 

استخدم تقنية LinqToDataSet فهي أفضل وأقل جهداً

ممكن تستخدم هذا الكود

On Error Resume Next

Me.BILLBindingSource.Filter = " INVOICEDATE >= #" & INVOICE_LIST.DateTimePicker2.Value.ToString("yyyy'/'MM'/'dd") & "# and INVOICEDATE <= #" & INVOICE_LIST.DateTimePicker1.Value.ToString("yyyy'/'MM'/'dd") & "#"

تقبل مروري

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

جميل علي

مهموم

abu7shihab