主题：[求助]关于user.roles在动态加载中的设置

'''''''''加载树
Dim cmd As New SQLCommand
Dim dt As DataTable
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
cmd.C
If User.Type = UserTypeEnum.Administrator Or User.Type = UserTypeEnum.Developer Then

cmd.CommandText = "S*LECT DISTINCT Year(创建时间) as 年,分类2 From {订单信息}"

Else
cmd.CommandText = "S*LECT DISTINCT Year(创建时间) as 年,分类2 From {订单信息} where [分类2]  in （'" & user.roles & "'）"
End If

dt = cmd.ExecuteReader()
trv.BuildTree(dt,"年|分类2")
trv.Nodes.Insert("所有订单",0)

分类2 是角色的设置：   产品线A,产品线B,产品线C,产品线D,产品线E,产品线F