Foxtable(狐表)用户栏目专家坐堂 → [求助]什么事件中触发行状态deleted有效


  共有5066人关注过本帖树形打印复制链接

主题:[求助]什么事件中触发行状态deleted有效

帅哥哟,离线,有人找我吗?
exonjee
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:3192 威望:0 精华:0 注册:2008/9/1 9:38:00
[求助]什么事件中触发行状态deleted有效  发帖心情 Post By:2013/7/24 17:07:00 [只看该作者]

如题

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/24 17:09:00 [只看该作者]

什么意思 没看懂? 

 回到顶部
帅哥哟,离线,有人找我吗?
exonjee
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:3192 威望:0 精华:0 注册:2008/9/1 9:38:00
  发帖心情 Post By:2013/7/24 17:12:00 [只看该作者]

我想在删除数据保存时记录删除的数据,只记录用rowstate行状态deleted标识的数据

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/24 17:14:00 [只看该作者]

保存到哪里去?  在BeforeDeleteDataRow事件中还可以获得删除的行.

 回到顶部
帅哥哟,离线,有人找我吗?
exonjee
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:3192 威望:0 精华:0 注册:2008/9/1 9:38:00
  发帖心情 Post By:2013/7/24 17:16:00 [只看该作者]

我在

BeforeDeleteDataRow

DataRowDeleting

DataRowDeleted

 

三个事件试过都不行,没反应


 回到顶部
帅哥哟,离线,有人找我吗?
晕了快扶我
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1207 积分:7224 威望:0 精华:0 注册:2013/3/4 18:02:00
  发帖心情 Post By:2013/7/24 17:18:00 [只看该作者]

以下是引用exonjee在2013-7-24 17:12:00的发言:
我想在删除数据保存时记录删除的数据,只记录用rowstate行状态deleted标识的数据

加个标示列,删除的时候不要真删除,然后不加载这些数据就行了

同时可以随时根据标识列来查询这些数据


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/7/24 17:20:00 [只看该作者]

以下是引用exonjee在2013-7-24 17:16:00的发言:

我在

BeforeDeleteDataRow

DataRowDeleting

DataRowDeleted

 

三个事件试过都不行,没反应

不可能没反应的上个例子吧, 另外6楼这个也是个好方案,俗称的软删除.

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/7/25 7:54:00 [只看该作者]

标记删除,而不真正删除,是惯用并且保险的做法,有反悔的机会呀。

如果确实需要物理地删除,又想记录删除数据,以下供参考:

DataRowDeleting

 

Dim nma() As String = {"A1","A2","A3"}  '源表数据来源列
Dim nmb() As String = {"原值A1","原值A2","原值A3"}  '记录表数据接收列
Dim nmc() As String = {"新值A1","新值A2","新值A3"}  '记录表数据接收列
Dim dr As DataRow = DataTables("数据变动记录").AddNew
For i1 As Integer = 0 To nma.Length - 1
    dr(nmb(i1)) = e.DataRow.OriginalValue(nma(i1))
    dr("修改方式") = e.DataRow.RowState
    dr("行号") = e.DataRow("_Identify")
    dr("被修改表") = e.DataTable.Name
    dr("修改者") = User.Name
    dr("修改日期") = Date.Now()
Next
Select Case dr("修改方式")
    Case "Unchanged"
        dr("修改方式") = "删除行"
    Case Else
        Return
End Select


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/7/25 8:41:00 [只看该作者]

DataRowDeleting事件执行的时候,表示行即将被删除,其实e.dataRow就是你即将被删除的行,不需要判断状态。

删除状态是无法判断的,帮助有误。


 回到顶部
帅哥哟,离线,有人找我吗?
exonjee
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:352 积分:3192 威望:0 精华:0 注册:2008/9/1 9:38:00
  发帖心情 Post By:2013/7/25 11:08:00 [只看该作者]

请尽快更正帮助,以免误导用户


 回到顶部