主题：[求助]关于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

按照您的写法,msgbox得到的s*lect语句如下：

 

s*lect DISTINCT Year(创建时间) As 年,分类2 From {订单信息} where 分类2 In （ '产品线A','产品线B','产品线C','产品线D')

说明你的方法是对的。

但是结果还是错的，显示 '('附近有语法错误，再点击是“未将对象引用到对象的实例。”

您觉得可能哪个地方错？

我再测试看看。

不是这个逗号的问题。

上面11楼，管理员或者开发者登录是没有问题的。

说明这句话还是有问题。

试过了，也不是这个问题。没有折了，我试试msgbox的调试方法，一步一步试吧。明天汇报一下问题所在。

非管理员用户：

'''''''''加载树
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
msgbox("S*lect DISTINCT Year(创建时间) As 年,分类2 From {订单信息}  where  [分类2]  In （'" & user.roles.replace(",","','") & "'）")

cmd.CommandText = "S*LECT DISTINCT Year(创建时间) As 年,分类2  From {订单信息}  where  [分类2]  in （'" & user.roles.replace(",","','") & "'）"
msgbox(2)                                                           -----显示：2
End If
msgbox(3)                                                          ------显示：3
dt = cmd.ExecuteReader()
msgbox(4)                                                          ------出现错误 ‘（’  附近有语法错误。       
trv.BuildTree(dt,"年|分类2")
msgbox(5)                                                           ------显示5
trv.Nodes.Insert("所有订单",0)                                ------未将对象引用到对象的实例

                                                                     

而采用“管理员”，或者“开发者”登录是没有问题的。

                                                                             

错误产生在第3到第4之间，关掉错误后，显示：4.

这一步有什么问题：