以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]数据填充,如何指定生成的非填充列内容  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=84601)

--  作者:qwz405
--  发布时间:2016/5/5 15:19:00
--  [求助]数据填充,如何指定生成的非填充列内容
dt是某个日期
希望表B完成填充的几行,其中有一列的数据为dt,例如:列D=dt

        Dim g As New GroupTableBuilder("统计表1", DataTables("表A"))
        g.Groups.AddDef("列A")
        g.Totals.AddDef("列B", AggregateEnum.Count, "列C")
        g.FromServer = True
        g.Filter = "([time列1] > \'"& dt &"\' Or [time列1] Is null) And [time列2] <= \'"& dt &"\'"
        g.Build()
        \'MainTable = Tables("统计表1")
        
        Dim f As New Filler
        f.SourceTable = DataTables("统计表1")    \'指定数据来源
        f.SourceCols = "列A,列C"               \'指定数据来源列
        f.DataTable = DataTables("表B")     \'指定数据接收表
        f.DataCols = "列A,列C"                \'指定数据接收列
        f.Fill()                                \'填充数据
        DataTables("表B").Save()

--  作者:大红袍
--  发布时间:2016/5/5 15:25:00
--  

 换一种方式填充

 

http://www.foxtable.com/help/topics/1533.htm