以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]当前行锁定问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=129750)

--  作者:bashanren
--  发布时间:2019/1/5 10:20:00
--  [求助]当前行锁定问题
各位老师上午好!!
我在窗口“关闭”按钮中写了如下代码,目的是想在关闭窗口时将关闭前所操作的“员工工作经历”表的当前行进行如下操作,但却总是处理是打开窗口时光标所处一那一行,如何将下面代码 的处理内容是在关闭窗口前所操作的行,请老师指导。

\'------------锁定编辑的当前行.
Dim r As Row = Tables("员工工作经历").Current
Tables("员工工作经历").Current("操作人") = _UserName
Tables("员工工作经历").Current("操作时间") = Date.Today()
Tables("员工工作经历").Current("锁定行") = True
Tables("员工工作经历").Current.Save()

\'----------关闭窗口
e.Form.Close

--  作者:Bin
--  发布时间:2019/1/5 10:24:00
--  
你用的是窗口表吧,取的表取错了应该是, 参考帮助 http://www.foxtable.com/webhelp/scr/1906.htm
--  作者:2900819580
--  发布时间:2019/1/5 10:25:00
--  
Dim r As Row = Tables("窗口1_员工工作经历").Current
r("操作人") = _UserName
r("操作时间") = Date.Today()
r("锁定行") = True
r.Save()

\'----------关闭窗口
e.Form.Close