Foxtable(狐表)用户栏目专家坐堂 → 如何实现取值到最后一次录入数据值


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

主题:如何实现取值到最后一次录入数据值

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/6 9:27:00 [显示全部帖子]

dr = DataTables("燃油录入").Find("[车号] = '" & e.NewValue & "'","[_Identify] desc")

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/6 10:25:00 [显示全部帖子]

那么不管代码,用眼睛看,怎么知道哪个数据是上次输入的数据?

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/6 10:26:00 [显示全部帖子]

或者说您的表格用什么可以判断哪个数据是上一次录入的?

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/6 15:26:00 [显示全部帖子]

如果开启了插入行功能,试试

dr = DataTables("燃油录入").Find("[车号] = '" & e.NewValue & "'","[_sortkey] desc,[_Identify] desc")

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/9 8:34:00 [显示全部帖子]

10楼的用法也不行?

增加一个辅助列“最后更新时间”,更新在datacolchanged事件,判断数量有变化就同步更新这个列的值

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/11 8:59:00 [显示全部帖子]

什么功能的编码?

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/11 13:55:00 [显示全部帖子]

datacolchanged事件

if e.datacol.name <> "最后更新时间" then
    e.daterow("最后更新时间") = date.now
end if
[此贴子已经被作者于2019/9/11 13:56:06编辑过]

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/12 9:30:00 [显示全部帖子]

上传实例说明

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


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/12 15:22:00 [显示全部帖子]

dr = DataTables("燃油录入").Find("[车号] = '" & e.NewValue & "' and [_Identify] < " & e.datarow("_Identify"),"[_Identify] desc")

 回到顶部