以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]根据时间列生成目录树  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=75465)

--  作者:leopain
--  发布时间:2015/10/9 11:56:00
--  [求助]根据时间列生成目录树
Dim dt As DataTable
Dim b As New SQLGroupTableBuilder("统计表1","编辑信息表")
b.Groups.AddDef("日期",DateGroupEnum.Year,"年")
b.Groups.AddDef("日期",DateGroupEnum.Month,"月")
b.Groups.AddDef("日期",DateGroupEnum.Day,"日")
dt = b.Build(False) \'参数设置为False,生成一个临时表,不在主界面显示
\'然后根据统计表生成目录树
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("编辑信息表", "年|月|日")
trv.StopRedraw
For Each nd As WinForm.TreeNode In trv.AllNodes
    Dim Year As Integer = nd.DataRow("年")
    Dim Month As Integer = nd.DataRow("月")
    Dim Day As Integer = nd.DataRow("日")
Next
trv.Nodes.Insert("加载所有行","加载所有行",0)
trv.ResumeRedraw

老师 帮我看一下  这段代码报错
“生成的SQL错误 无法继续统计”  , “无效列名:年”

--  作者:大红袍
--  发布时间:2015/10/9 11:59:00
--  

执行这句代码,看是否能得到统计表

 

Dim b As New SQLGroupTableBuilder("统计表1","编辑信息表")
b.Groups.AddDef("日期",DateGroupEnum.Year,"年")
b.Groups.AddDef("日期",DateGroupEnum.Month,"月")
b.Groups.AddDef("日期",DateGroupEnum.Day,"日")
b.Build

--  作者:leopain
--  发布时间:2015/10/9 12:01:00
--  
不行 执行说sql语句错误,无法继续统计
--  作者:大红袍
--  发布时间:2015/10/9 12:01:00
--  

表名肯定写错了。


--  作者:leopain
--  发布时间:2015/10/9 12:06:00
--  
没有啊  这次我直接用字段里面双击表面进去 也还是这个错啊
--  作者:大红袍
--  发布时间:2015/10/9 12:30:00
--  
你外部数据库里的表名肯定不是这个。