اخي الكريم
المشكلة
1/في حال اضافة بيانات في الداتا قرايد (عدة سطور) ثم اريد حذف سطر
من السطور فيعطينى الرسالةالتالية
Concurrency violation : the Delete command affected 0 off the expected 1 records.
2/1/في حال اضافة بيانات في الداتا قرايد (عدة سطور) يعطينى الرسالة
لايمكن ان يحتوي الفهرس اوالمفتاح الاساسي على قيمة فارغة
المطلوب
كود ترقيم في حال اضافة بيانات علما ان عمودالترقيم في الداتا قرايد رقمه (0)
والداتا قرايد تحوي جدولين بينهما علاقة
جزاكم الله خيرا واعتذر على عدم التوضيح
حاولت رفع ملف المشروع ولم استطع
هذا كود الاضافة
If MsgBox("هل تريد اضافة موظف جديد ؟ ", MsgBoxStyle.Exclamation + MsgBoxStyle.MsgBoxRight + MsgBoxStyle.OkCancel, "اضافة سجل جديد") = MsgBoxResult.Cancel Then Exit Sub
Application.DoEvents()
DataSet1.RejectChanges()
BindingSource1.AddNew()
Label1.Text = DataSet1.Tables("Tab1").Compute("Max(ID)", "ID >= 0") + "33"
BindingSource1.EndEdit()
TextBox1.Focus()
count()
اخي الكريم اريد في حال البدء بالاضافة يتم الترقيم لتفادي المشكلة
جزاك الله خيرا
المشكلة
1/في حال اضافة بيانات في الداتا قرايد (عدة سطور) ثم اريد حذف سطر
من السطور فيعطينى الرسالةالتالية
Concurrency violation : the Delete command affected 0 off the expected 1 records.
2/1/في حال اضافة بيانات في الداتا قرايد (عدة سطور) يعطينى الرسالة
لايمكن ان يحتوي الفهرس اوالمفتاح الاساسي على قيمة فارغة
المطلوب
كود ترقيم في حال اضافة بيانات علما ان عمودالترقيم في الداتا قرايد رقمه (0)
والداتا قرايد تحوي جدولين بينهما علاقة
جزاكم الله خيرا واعتذر على عدم التوضيح
حاولت رفع ملف المشروع ولم استطع
هذا كود الاضافة
If MsgBox("هل تريد اضافة موظف جديد ؟ ", MsgBoxStyle.Exclamation + MsgBoxStyle.MsgBoxRight + MsgBoxStyle.OkCancel, "اضافة سجل جديد") = MsgBoxResult.Cancel Then Exit Sub
Application.DoEvents()
DataSet1.RejectChanges()
BindingSource1.AddNew()
Label1.Text = DataSet1.Tables("Tab1").Compute("Max(ID)", "ID >= 0") + "33"
BindingSource1.EndEdit()
TextBox1.Focus()
count()
اخي الكريم اريد في حال البدء بالاضافة يتم الترقيم لتفادي المشكلة
جزاك الله خيرا
