以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 记录修改用户名和时间代码求助 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=5827) |
-- 作者:wqc360 -- 发布时间:2010/1/21 10:07:00 -- 记录修改用户名和时间代码求助 我在表属性AfterEdit事件中设置如下代码: if e.col.name = "最后修改" e.Cancel = True else e.row("最后修改") =Tables("登陆")(0)("用户名")& " " & now end if 但是现在我是在录入窗口进行修改数据,怎么“最后修改”列不会记录,是否可以在修改窗口保存按钮中加代码,代码应怎么写。窗口保存代码如下: Tables("产品目录").Current.Locked = True \'锁定行 Forms("产品目录修改").Close() \'关闭窗口 Ctype(ApplicationMenu.LeftItems("Save"), RibbonMenu.Button).PerformClick() \'保存 DataTables("产品目录").AllowEdit = False |
-- 作者:wqc360 -- 发布时间:2010/1/21 11:06:00 -- 已解决: 1.在窗口AfterLoad事件设置代码: With Forms("产品目录修改").Controls("最后修改") .Value = Tables("登陆")(0)("用户名")& " " & now End With 2.在窗口绑定字段控件(最后修改)TextChanged事件设置代码: e.Sender.WriteValue() 不知有没有更简单的方法。 |