خطأ في كود الحذف من جدول البيانات داخل الداتا جريد فيو - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183) +--- الموضوع : خطأ في كود الحذف من جدول البيانات داخل الداتا جريد فيو (/showthread.php?tid=24467)

خطأ في كود الحذف من جدول البيانات داخل الداتا جريد فيو - Mohamed Samy21 - 08-04-18 الخطأ هو  (System.Data.OleDb.OleDbException: 'Data type mismatch in criteria expression.') هدا هو الكود لزرار الحذف     Private Sub Btndelete_Click(sender As Object, e As EventArgs) Handles Btndelete.Click         If (DGV1.SelectedRows.Count = 0) Then             MessageBox.Show("يجب تحديد صف للحذف")             Return         End If         If (MessageBox.Show("هل تريد حذف هذا السجل فعلا  ؟", "تأكيد الحذف", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2, MessageBoxOptions.RightAlign) <> DialogResult.Yes) Then Return         Dim str As String = String.Format("delete from [govschool] where  [visitid] = {0}", DGV1(0, DGV1.SelectedRows(0).Index).Value.ToString())         cmd = New OleDbCommand(str, conn)         conn.Open()         cmd.ExecuteNonQuery()         conn.Close()         dt.Clear()         table_govschool_Load()         MessageBox.Show("تم الحذف بنجاح")         'Dim cmd As New OleDbCommand         'cmd = New OleDbCommand(" delete from  govschool where visitid =  '{0}'", conn)         'conn.Open()         'cmd.ExecuteNonQuery()         'conn.Close()     End Sub