内容修改保存的求助 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 内容修改保存的求助

共有4050人关注过本帖树形打印复制链接主题：内容修改保存的求助

lb4177

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：39 积分：550 威望：0 精华：0 注册：2012/6/4 18:12:00

内容修改保存的求助 发帖心情

Post By：2014/1/26 16:23:00 [只看该作者]

哪位大侠帮我解决一下，我的表中有一列“证书编号”的内容很重要，如果证书编号为修改了，我想在表中的“修改”列中将证书编号中的修改前的内容和修改后的内容保存到修改列中，修改了几次我就保存几次，怎么可以实现，谢谢

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/1/26 16:26:00 [只看该作者]

把修改列类型设置为备注.

在DataColChangIng事件中

e.datarow("修改")=e.datarow("修改") & "修改时间:" & date.now & " 修改前:" & e.oldValue & " 修改后:" & e.newValue & vbclrf

zyqzyy

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：822 积分：5879 威望：0 精华：0 注册：2013/7/29 12:00:00

Post By：2014/1/26 17:31:00 [只看该作者]

在Bin老师的代码上作了一点修改，实现楼主的要求！上个例子供参考！

下载信息 [文件大小：下载次数： ]
点击浏览该文件:修改记录.foxdb

lb4177

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：39 积分：550 威望：0 精华：0 注册：2012/6/4 18:12:00

Post By：2014/1/28 0:19:00 [只看该作者]

大哥，你上传的例子我打不开，能否直接看看你的代码，谢谢

lsy

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00

Post By：2014/1/28 8:17:00 [只看该作者]

BeforeSaveDataRow

If e.DataRow.OriginalIsNull("证书编号") = False AndAlso e.DataRow("证书编号") <> e.DataRow.OriginalValue("证书编号") Then
e.DataRow("修改记录") + = "修改时间:" & Date.Now & " 修改前:" & e.DataRow.OriginalValue("证书编号") & " 修改后:" & e.DataRow("证书编号") & vbcrlf
End If

没有保存的数据都没有意义。

如果保存前修改多次，并最终执行了保存操作，只有最后一次修改的数据，才有意义。

所以，DataColChangIng、DataColChanged事件，都不合适。

lb4177

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：39 积分：550 威望：0 精华：0 注册：2012/6/4 18:12:00

Post By：2014/1/28 23:51:00 [只看该作者]

非常感谢各位老师的指点，谢谢，现在可以实现了图片点击可在新窗口打开查看

下一主题 >> << 上一主题

主题：内容修改保存的求助