If e.DataCol.name = "要求交货日期" Then
If e.DataRow.isnull("要求交货日期") = False Then
If e.DataRow.isnull("序号") Then
Dim max As Integer = e.DataTable.SQLCompute("Max(序号)", "[_Identify] <> " & e.DataRow("_Identify")) '取得最大序号
e.DataRow("序号") = max + 1
'e.DataRow.save
DataTables("叫料piao号").save
End If
Else
e.DataRow("序号") = Nothing
'e.DataRow.save
DataTables("叫料piao号").save
End If
End If
上面的代码，无论用 e.DataRow.save 还是 DataTables("叫料piao号").save，都无法保存数据，因为我每次再增加一行时，e.DataRow("序号") 的数据不会增加 1。如果我先增加一行后，用人工保存一下数据库，再增加一行时，e.DataRow("序号") 的数据就会增加 1 了。请问是为什么呢？谢谢。
上述代码是放在 datacolchanged 里面的。
这2种方法肯定是可以保存数据的。检查是不是有其它代码影响了
[此贴子已经被作者于2024/5/8 16:37:59编辑过]
Dim max As Integer = e.DataTable.SQLCompute("Max(序号)", "[_Identify] <> " & e.DataRow("_Identify")) '取得最大序号
e.DataRow("序号") = max + 1
e.DataRow.save
我把上面代码放在 datarowadding 里面也是一样，保存不了，要人工保存才行。
比如这是一个查询表或者临时表。比如其它
BeforeSaveDataRow等其它事件取消了保存。比如数据不完整，数据库无法保存。....
这是一个数据表，不是查询表或者临时表。beforeSaveDataRow 里面没有代码。
"数据不完整，数据库无法保存"，不知道哪个情况会这样。
我将1楼的第一行代码改为：If e.DataCol.name = "要求交货日期" OrElse e.DataCol.name = "piao号日期" Then
即增加了一个变量，那么我在录入"piao号日期" 后，就可以保存了。
要录入"要求交货日期"， "piao号日期"其中一个，才会触发事件