- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 流程操作记录 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=69462)
-- 发布时间：2015/6/5 14:38:00
-- 流程操作记录
我想在订单表建立订单编号时在 订单动态详情 建立一个详情，
写在AfterEdit下貌似不对
If e.Col.Name = "订单编号" Then
Tables("订单动态详情").Cols("流程名称")= "订单编号"
Tables("订单动态详情").Cols("操作人")= User.Name & " " & Date.Now
End If
还想记录他在单元格入输入了什么内容
[此贴子已经被作者于2015/6/5 14:41:21编辑过]
-- 发布时间：2015/6/5 14:41:00
--
If e.Col.Name = "订单编号" Then
e.row("流程名称")= "订单编号"
e.row("操作人")= User.Name & " " & Date.Now
End If
-- 发布时间：2015/6/5 14:44:00
--
If e.Col.Name = "订单编号" Then e.row("流程名称")= "订单编号" 我是单独建立一张记录表 e.row("操作人")= User.Name & " " & Date.Now e.row("操作数据")= ? 记录输入的值 End If |
-- 发布时间：2015/6/5 14:45:00
--
看一下
http://foxtable.com/bbs/dispbbs.asp?boardid=2&Id=69454
-- 发布时间：2015/6/5 15:04:00
--
看了 貌似不行 我是想针对单元格的变化来记录的
If e.Col.Name = "订单编号" Then 如果他发生变化 开始记录
Dim dr As DataRow = DataTables("订单动态详情").addnew
dr("订单编号")=e.DataRow("唯一编号")
dr("流程名称")=e.DataCol.name
dr("被操作的表")=e.DataTable.name
dr("操作人")=user.name
dr("XT_日期")=Date.now
dr("操作前值")=e.oldValue
dr("操作后值")=e.NewValue
End If
[此贴子已经被作者于2015/6/5 15:05:09编辑过]
-- 发布时间：2015/6/5 15:56:00
--
我只想选择选择性的记录 前面的代码整个记录，
我想只记载关键的列
If e.Datacol.Name = "订单编号" Then
Dim dr As DataRow = DataTables("订单动态详情").addnew
dr("订单编号")=e.DataRow("订单编号")
dr("操作前值")=e.oldValue
dr("操作后值")=e.NewValue
End If
搞定
[此贴子已经被作者于2015/6/5 16:04:47编辑过]
-- 发布时间：2015/6/5 16:02:00
--
加了判断，就是记录某个列的，你5楼的代码没什么你
If e.Col.Name = "订单编号" Then 如果他发生变化 开始记录