以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  查询表中最后一条记录  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104832)
--  作者：zhangxl1964
--  发布时间：2017/8/6 13:02:00
--  查询表中最后一条记录
有点甜老师：你好！
        我想用查询表，在询价定价表中按日期提取 每个存货编码 定价的最后一条记录，然后手工编码进行填充，这个条件表达式怎么写？下面的代码麻烦帮助修改。       
        Dim jb11 As New SQLJoinTableBuilder("查询表1","询价定价")
        jb11.C
        Dim dt11 As DataTable
        
        jb11.AddCols("大类","小类","存货编码","存货名称","规格","单位","定价")
        jb11.Filter = " Select  存货编码,存货名称,单位,规格,max(日期),sum(定价) F rom {询价定价} Group By 存货编码,存货名称,单位,规格 "
        
        dt11 = jb11.Build(True) \'生成一个DataTable
        dr("询价") = dt11.Compute("Sum(定价)","[存货编码] = \'" & dr("存货编码") & "\'")
--  作者：有点甜
--  发布时间：2017/8/6 13:10:00
--  

参考

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=104693&skin=0