Posted 8 October 2020, 4:14 pm EST
Hi! why presented this error?
System.InvalidOperationException: dataTable internal index is corrupted: ‘14’.
en System.Data.RBTree
1.RBDeleteFixup(Int32 root_id, Int32 x_id, Int32 px_id, Int32 mainTreeNodeID) en System.Data.RBTree
1.RBDeleteX(Int32 root_id, Int32 z_id, Int32 mainTreeNodeID)en System.Data.RBTree`1.DeleteByIndex(Int32 i)
en System.Data.Index.DeleteRecord(Int32 recordIndex, Boolean fireEvent)
en System.Data.Index.ApplyChangeAction(Int32 record, Int32 action, Int32 changeRecord)
en System.Data.DataTable.RecordStateChanged(Int32 record1, DataViewRowState oldState1, DataViewRowState newState1, Int32 record2, DataViewRowState oldState2, DataViewRowState newState2)
en System.Data.DataTable.SetNewRecordWorker(DataRow row, Int32 proposedRecord, DataRowAction action, Boolean isInMerge, Boolean suppressEnsurePropertyChanged, Int32 position, Boolean fireEvent, Exception& deferredException)
en System.Data.DataTable.DeleteRow(DataRow row)
en System.Data.DataView.Delete(DataRow row)
en FarPoint.Web.Spread.Model.DefaultSheetDataModel.a(Int32 A_0, Int32 A_1, Boolean A_2)
en FarPoint.Web.Spread.Rows.Remove(Int32 index, Int32 count)
Dim fps As New FarPoint.Web.Spread.FpSpread(1)
…
…
…
For IRow As Integer = fps.Rows.Count - 1 To 0 Step -1
Dim DeleteRow As Boolean = False
For IColumn As Integer = 0 To fps.Columns.Count - 1
If fps.Cells(IRow, IColumn).Value Is Nothing OrElse fps.Cells(IRow, IColumn).Value.ToString = String.Empty Then
DeleteRow = True
Else
DeleteRow = False
Exit For
End If
Next
If DeleteRow Then
fps.Rows.Remove(IRow, 1)
End If
Next