[alma_fandi]

السلام عليكم
ما الخطأ في هذا الكود كما في الصورة
ارجو منكم الحل

   

[mansoor]

الرسالة تقول عدم تطابق نوع البيانات
حسب الصورة يوجد الحقل [Sex] والحقل[Birthday]
لكن الافضل وضع الحقل [Sex] بالبارامتر مثل البقية بحيث تكون

PHP كود :

WHERE [Sex]=@sex 


PHP كود :

cmd.Paramiters.AddWithValue("@sex", cboText.Text) 


ملاحظة OleDbDataAdapter لا تحتاج Con.Open وCon.Close

[alma_fandi]

شكرا جزيلا Mansoor
ارجو المساعدة بتعديل الكود

PHP كود :

Dim dt As New DataTable
        Dim parameters As New List(Of OleDbParameter)

        Dim sql = "SELECT * FROM [Table1] WHERE [Sex]='" & cboSex.Text & _
        "' AND [Birthday] BETWEEN  @StartDate AND @EndpDate "

        Dim cmd = New OleDbCommand(sql, Con)
        cmd.Parameters.AddWithValue("@StartDate", DateTimePicker1.Value)
        cmd.Parameters.AddWithValue("@EndpDate", DateTimePicker2.Value)
        Dim da = New OleDbDataAdapter(cmd)

        da.Fill(dt)
        dgvList.DataSource = dt 


[mansoor]

PHP كود :

Dim sql = "SELECT * FROM [Table1] WHERE [Sex]=@sex AND [Birthday] BETWEEN  @StartDate AND @EndpDate "
Dim da As New OleDbDataAdapter(sql, Con)
da.SelectCommand.Parameters.AddWithValue("@sex", cboSex.Text)
da.SelectCommand.Parameters.AddWithValue("@StartDate", DateTimePicker1.Value.Date)
da.SelectCommand.Parameters.AddWithValue("@EndpDate", DateTimePicker2.Value.Date)

Dim dt As New DataTable
da.Fill(dt)

dgvList.DataSource = dt 


[alma_fandi]

شكرا جزيلا الكود اشتغل تمام