[... صدى ...]

السلام عليكم
اخوتي الكرام


الكود التالي كود حفظ بيانات في الداتا قرايد

Try
If BindingSource1.Count = 0 Then Beep() : Exit Sub
BindingSource1.EndEdit()
DataAdapter1.Update(DataSet1, "Tab1")
DataAdapter2.Update(DataSet1, "Tab2")
count()
MsgBox("تمت عملية الحفظ بنجاح", 64 + 524288, "نجاح الحفظ")
Catch ex As Exception
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

End Try
المشكلة
اني ادخل بيانات في الداتا قرايد (عدة سطور)ثم اريد حذف سطر
من السطور فيعطينى الرسالةالتالية
Concurrency violation : the Delete command affected 0 off the expected 1 records.

المطلوب
كود تحديث البيانات لاعادة الترقيم علما ان عمود الترقيم في الداتا قرايد رقمه (0)


جزاكم الله خيرا وحفظكم الله واخوتنا
في منتدى فيجول بيسك دوت نت الذي كان له الفضل في الاخذ بايدينا لتعلم هذه اللغة.