السلام عليكم
لدي datagrid مربوطة بـ dataveiw تأخذ بياناتها من Dataset
المطلوب هو تعديل قيمة حقل في الداتا سيت بيحث تتعدل تلقائيا في الداتا جريد الظاهرة للمستخدم
المشكلة انني عندما اضيف سطر عن طريق الكود يقبل الاضافة ولكن عند الحفظ يعطي رسالة خطا
الكود الذي جربته هو كما يلي
If ShowMessage(1142, 4, 16, 0) = DialogResult.Yes Then
Dim i As Integer
'dgrTrans.Item(dgrTrans.CurrentRowIndex,0) = 0
i = DataView1.Count + 1
While i > DataView1.Count - 1
'dgrTrans.Item(i - 2, 0) = i
DataView1.Item(i - 2)("TID") = i
'Me.InvDataSet1.TRANS_DETAILS.Rows(i - 2).Item("TID") = i
i = i - 1
End While
'Me.InvDataSet1.TRANS_DETAILS.Rows(4).Item("TransDesc") = 4
Me.InvDataSet1.TRANS_DETAILS.AcceptChanges()
RowCount = dgrTrans.CurrentRowIndex + 2
Else
RowCount = Me.DataView1.Count + 1
End If
Me.InvDataSet1.TRANS_DETAILS.AddTRANS_DETAILSRow(RowCount, Me.txtTransNo.Text, FormTransType, CurrentPeriod, CompID, "JV", TransDate, 0, 0, DBNull.Value.ToString, DBNull.Value.ToString, _
Me.txtTransDesc.Text, 0, 1, "الميزانية", GetSettingValue("MainCurrency"), True, CompID & CurrentPeriod & lblTransType.Text & txtTransNo.Text)
Me.InvDataSet1.TRANS_DETAILS.AcceptChanges()وعند الحفظ تظهر الرسالة التالي :
لااعرف ماهي المشكلة بالضبط
علما بانني عندما اعدل يدويا على الحقول المطلوب تعديله وهو حقل المسلسل واحفظ يتم الحفظ بنجاح !!