以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]在项目事件BeforeCloseProject中写入以下代码,关闭项目时怎么找出未保存的删除行?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185235)

--  作者:ytzn
--  发布时间:2023/2/12 13:54:00
--  [求助]在项目事件BeforeCloseProject中写入以下代码,关闭项目时怎么找出未保存的删除行?


Dim z As String \'增加或修改的编号
Dim s As String \'删除的编号
Dim dt As DataTable = DataTables("订单")
If dt.HasChanges Then
    For Each dr As DataRow In dt.DataRows
        If dr.RowState = DataRowState.Modified OrElse dr.RowState = DataRowState.Added Then
            z = z & "," & r("编号")
        ElseIf dr.RowState = DataRowState.Deleted Then
            s = s & "," & r("编号")
        End If
    Next
    MessageBox.Show("以下增加修改未保存" & z & "| 以下删除未保存" & s)
End If



但是Deleted行找不出来, 怎样才能找出来? 多谢!

--  作者:有点蓝
--  发布时间:2023/2/12 20:21:00
--  
找不出来。个人的建议是判断表格有更改即HasChanges就够了,让用户知道有未保存的数据,提示是否保存即可。再说了已经删除的数据用户也看不到,提示个编号出来基本也没有什么意义