[thabit]

السلام عليكم

الاخوة المبرمجين كيف يتم الاستعلام عن تاريخ من داخل قاعدة البيانات ومقارنته بتاريخ اليوم مع العلم اني اعرف كيف اقارن بين تاريخين ولكن اريد عند فتح الفورم يجلب فقط الحقول التي تحتوي على تاريخ معين ..

ويقارن مع تاريخ اليوم وتكون اقل من ثلاثون يوما 

وللتوضيح اكثر ارفق لكم الكود التالي :

  Dim D1 As Date

            Dim D2 As Date

    ()  Dim TS As New TimeSpan

            D1 = date_1.Value

            D2 = date_2.Value
            TS = D2 - D1

()  con.Open

   

        Dim ds As New DataSet

            Dim dt As New DataTable

            ds.Tables.Add(dt)

            Dim da As New OleDbDataAdapter

            da = New OleDbDataAdapter(" Select emp_name,cbo_job,abss_date,abss_date_re,abss_no,cbo_type from tb_absencess WHERE abss_date between '" + abss_date.Text + "' and '" + abss_date2.Text + "' and abss_no <= 30 ", con)

            da.Fill(dt)

     

       dgv1.DataSource = dt.DefaultView

[b]()  con.Close[/b]