以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  SQLCrossTableBuilder 多表统计，卡死  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87833)
--  作者：fubblyc
--  发布时间：2016/7/20 17:42:00
--  SQLCrossTableBuilder 多表统计，卡死

如下代码，查询超出时间，设置为600秒，直接卡死不动。。。不知道是不是代码有问题。。。

Dim bd1 As New SQLcrossTableBuilder("统计表1","动销sku数")
    bd1.C
    \'Dim Cols1() As String = {"库位","门店","调整期间"}
    \'Dim Cols2() As String = {"库位","门店","调整期间"}
    Dim Cols1() As String = {"关联列"}
    Dim Cols2() As String = {"关联列"}
    bd1.AddTable("动销sku数",Cols1,"库位销售分析",Cols2)
    bd1.HGroups.AddDef("{库位销售分析}.门店") \'添加客户列用于水平分组
    bd1.HGroups.AddDef("{库位销售分析}.库位") \'添加客户列用于水平分组
    bd1.HGroups.AddDef("销售日期",DateGroupEnum.year,"区间") \'添加客户列用于水平分组
    bd1.vGroups.AddDef("{库位销售分析}.调整期间","调整期间_{0}") \'添加客户列用于水平分组
    bd1.Totals.AddDef("销售数量","销量") \'添加数量列用于统计
    If e.Form.Controls("CheckBox8").checked = True Then
        bd1.Totals.AddDef("动销数") \'添加数量列用于统计
    End If
Tables(e.Form.Name & "_table1").DataSource = bd1.BuildDataSource()

 

 

 

反过来设置也是一样：

Dim bd1 As New SQLcrossTableBuilder("统计表1","库位销售分析")
    bd1.C
    \'Dim Cols1() As String = {"库位","门店","调整期间"}
    \'Dim Cols2() As String = {"库位","门店","调整期间"}
    Dim Cols1() As String = {"关联列"}
    Dim Cols2() As String = {"关联列"}
    bd1.AddTable("库位销售分析",Cols1,"动销sku数",Cols2)
[此贴子已经被作者于2016/7/20 17:43:22编辑过]
--  作者：大红袍
--  发布时间：2016/7/20 18:00:00
--  

 代码没什么问题吧？你的数据量很大？

 

 把两个表导出，然后导入到一个新的项目测试呢？（要避免有代码影响）