Select e.DataCol.Name
Case "群组分类"
If e.DataRow.IsNull("群组分类") Then
e.DataRow("客户ID") = Nothing
Else
Dim lb As String = e.DataRow("群组分类")
Dim idx As Integer
idx = e.DataTable.Compute("Max(客户ID)","群组分类 = '" & lb & "' And [_Identify]<> " & e.DataRow("_Identify")) '取得该类别的最大编号
e.DataRow("客户ID") = idx + 1
End If
End Select
老师,上面的代码在使用时报错,以前是内部数据表,现在我用外部数据表主键列字段名称改为编号,现不知怎样修改上面的代码了。
Exception has been thrown by the target of an invocation.
Column '_Identify' does not belong to table 通信.