Foxtable(狐表)用户栏目专家坐堂 → [求助]目录树格式表达式


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

主题:[求助]目录树格式表达式

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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
[求助]目录树格式表达式  发帖心情 Post By:2015/7/6 10:34:00 [只看该作者]

老师 ,
  这样好像不对,可以这样做吗
e.Form.Controls("TreeView2").BuildTree("Jobcard明细表", "组别|year("年度") & "年" & Month("年度") &"月"|co")

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/6 10:35:00 [只看该作者]

 不能这样做,要先用sql语句查出表

 

 如

 

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "Select Distinct Year(日期) As 年, Month(日期) As 月, 产品 F rom {订单}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt, "年|月|产品")
trv.Nodes.Insert("显示所有行",0)


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


加好友 发短信
等级:九尾狐 帖子:2928 积分:20184 威望:0 精华:0 注册:2012/2/3 17:45:00
  发帖心情 Post By:2015/7/6 10:55:00 [只看该作者]

老师,
   access 数据库
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "SELECT DISTINCT Year([年度]) As 年, Month([年度]) As 月,Fr om {Jobcard明细表}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView2")
trv.BuildTree(dt, "年|月")


显示 SELECT 子句中包含一个保留字、拼写错误或丢失的参数,或标点符号不正确。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/7/6 10:58:00 [只看该作者]


 回到顶部