[ameerah]

استخدم Parameters واكتب اسم الجدول واسم الحقل بين أقواس دائماً

كود :

Using DataAdapter1 As New OleDbDataAdapter("SELECT * FROM [entag1] WHERE [malemName] = @name AND [date] BETWEEN @date1 AND @date2 ", Con)
    DataAdapter1.SelectCommand.Parameters.AddWithValue("@name", txtbillnumber.Text)
    DataAdapter1.SelectCommand.Parameters.AddWithValue("@date1", DateTimePicker1.Value.Date)
    DataAdapter1.SelectCommand.Parameters.AddWithValue("@date2", DateTimePicker2.Value.Date)
    Using DataTable As New DataTable
        DataAdapter1.Fill(DataTable)
        DataGridView1.DataSource = DataTable
    End Using
End Using

لا تحتاج Con.Open وCon.Close مع DataAdapter تحديداً لأنه يقوم بذلك تلقائيا.