Foxtable(狐表)用户栏目专家坐堂 → 查找最后一条的结束数的语句还是有问题


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

主题:查找最后一条的结束数的语句还是有问题

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


加好友 发短信
等级:一尾狐 帖子:400 积分:4856 威望:0 精华:0 注册:2017/2/7 7:41:00
查找最后一条的结束数的语句还是有问题  发帖心情 Post By:2018/11/15 22:22:00 [显示全部帖子]

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=127227&replyID=&skin=1
接上次的问题

同一台机器有多班生产,有多条记录,如4#机,2018-11-06 已有二条记录。
现在新增一条 4#机的生产数时,发现找到的还是2018-11-06的第一条 4号机记录的结束数:230,而不是最后一条:399

 Dim dd As  String
            dd = e.DataRow("操作台")
            Dim dr As DataRow
            'dr =  DataTables("每日工作量").Find ("操作台 = '" & dd & "'","操作日期 Desc") '找出最后一次这个操作台的记录
            dr =  DataTables("每日工作量").Find ("操作台 = '" & dd & "' and _sortkey < " & e.DataRow("_sortkey"),"操作日期 Desc") '找出最后一次这个操作台的记录
            If dr IsNot Nothing Then '如果找到的话
                MessageBox.Show("已找到上次操作台号")
                e.DataRow("开始数") = dr("结束数")
            Else
                MessageBox.Show("没有找到此操作台的上次记录,初始值为0")
                e.DataRow("开始数") = 0
            End If

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:计件工资1.table



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


加好友 发短信
等级:一尾狐 帖子:400 积分:4856 威望:0 精华:0 注册:2017/2/7 7:41:00
  发帖心情 Post By:2018/11/15 22:57:00 [显示全部帖子]

谢谢甜版主!
这个结果是对的,找到了最后一条4#机记录
是不是又增加了一个按记录指针排序的条件?

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


加好友 发短信
等级:一尾狐 帖子:400 积分:4856 威望:0 精华:0 注册:2017/2/7 7:41:00
  发帖心情 Post By:2018/11/15 23:30:00 [显示全部帖子]

谢谢!

 回到顶部