Foxtable(狐表)用户栏目专家坐堂 → 找出每个物品最后一次记录


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

主题:找出每个物品最后一次记录

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


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
找出每个物品最后一次记录  发帖心情 Post By:2022/4/14 20:13:00 [显示全部帖子]

"防控物资储备"是个流水账,有很多条记录,有的物品名是相同的,但入库的日期不同。
我想找出每个物品最后一次的记录。怎么写呢?


Dim Customers As List(Of String)
Customers = DataTables("防控物资储备").GetValues("物品名称","","日期 Desc")
For Each Customer As String In Customers
    Output.Show(Customer)
Next


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


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2022/4/17 16:52:00 [显示全部帖子]

在命令窗口运行出错
S elect a.物品名称,a.库存 fro m {防控物资储备} As a inner join(Sel ect 物品名称,max(日期) As 日期 fro m {防控物资储备} group by 物品名称) As b on a.物品名称 = b.物品名称 And a.日期=b.日期

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


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2022/4/18 8:14:00 [显示全部帖子]

老师,是SqlServer

图片点击可在新窗口打开查看

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


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2022/4/19 7:55:00 [显示全部帖子]

请问老师,下面的代码不能写在菜单的按钮里吗?如果能写到菜单按钮事件中,怎么改 呢?
Se lect a.物品名称,a.规格型号,a.单位,a.日期,a.库存,a.是否分发完 fr om {防控物资储备} As a inner join(Se lect 物品名称,max(日期) As 日期 fr om {防控物资储备} group by 物品名称) As b on a.物品名称 = b.物品名称 where a.日期=b.日期

 回到顶部