+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] السلام عليكم اخوان ممكن مساعده بكود حذف (/showthread.php?tid=25516)
السلام عليكم اخوان ممكن مساعده بكود حذف - فراس محي - 26-06-18
عندي برنامج وقاعده البيانات مالته اكسس 2007 بس المشكله ما عم يحذف الحقل الي احدده من الداتا قريد ويطلع خطا
ونوع الخطا مرفق تحت
وكود الحذف هذا في حاله لم تضهر المرفقات
PHP كود :
MessageBox.Show("هل تريد حذف الرقم", "تأكيد", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If vbYes Then
Dim delnum As Integer
Dim ro As Integer = DataGridView1.CurrentRow.Index
delnum = DataGridView1.Rows(ro).Cells("id").Value
dataconnection()
cmd.Connection = cnn
cmd.CommandText = "DELETE FROM info WHERE id='" & delnum & "' "
cmd.ExecuteNonQuery()
cnn.Close()
delnum = 0
MessageBox.Show("تم حذف الرقم من قاعدة البيانات نهائيا")
loaddata()
End If
An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in System.Data.dll
Additional information: Data type mismatch in criteria expression.
RE: السلام عليكم اخوان ممكن مساعده بكود حذف - سعود - 26-06-18
كود :
"DELETE FROM info WHERE id='" & delnum & "' "كود :
"DELETE FROM info WHERE id=" & val(delnum) & ""RE: السلام عليكم اخوان ممكن مساعده بكود حذف - فراس محي - 27-06-18
(26-06-18, 01:49 PM)سعود كتب :اذا كان الاي دي رقمي احذف علامات التنصيص المفردة ' ليكون هكذا بعد التعديلكود :
"DELETE FROM info WHERE id='" & delnum & "' "
كود :
"DELETE FROM info WHERE id=" & val(delnum) & ""
ربي يحفظك ويسلمك ويضعه في ميزان حسناتك مشى الحال وحذف على التعديل تبعك
بس في مشكله بدي اعمل update وما راضي يعمل بيطلع خطاء وهذه الكود
PHP كود :
dataconnection()
cmd.Connection = cnn
cmd.CommandText = "update [info] set " & _
"([name],[department],[dgree],[pagn],[typepag],[typegan],[ngan],[unti]) VALUES" & _
"('" & TextBox1.Text & "','" & ComboBox1.Text & "','" & ComboBox5.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & ComboBox6.Text & "','" & TextBox5.Text & "','" & ComboBox6.Text & "')"
cmd.ExecuteNonQuery()
cnn.Close()
RE: السلام عليكم اخوان ممكن مساعده بكود حذف - boudyonline - 27-06-18
اخي الفاضل :
أين الشرط في جملة التعديل ؟؟
Where