各位高手:
我做了个目录树用于筛选数据,随着数据的增多,目录树的节点也越来越多,会出现“指定的参数已超出有效值的范围,参数名:index”的报错,请问有办法消除吗?我将生成目录树的代码写在了导航栏窗口的“Afterload”下。
生成目录树代码:
Dim cmd1,cmd2,cmd3 As New SQLCommand
Dim dt1,dt2,dt3 As DataTable
cmd1.C
cmd1.CommandText = "SELECT DISTINCT status,property,pjname,pdname,pdmodel F rom {Pplan}"
dt1 = cmd1.ExecuteReader()
e.Form.Controls("TreeView-plan").BuildTree(dt1, "status|property|pjname|pdname|pdmodel")
e.Form.Controls("TreeView-plan").Nodes.insert("Node0","加载全部数据",0)
cmd2.C
cmd2.CommandText = "SELECT DISTINCT 项目名称,产品名称,产品型号 F rom {采购计划}"
dt2 = cmd2.ExecuteReader()
e.Form.Controls("TreeView-Buyplan").BuildTree(dt2, "项目名称|产品名称|产品型号")
e.Form.Controls("TreeView-Buyplan").Nodes.insert("Node0","加载全部数据",0)
cmd3.C
cmd3.CommandText = "SELECT DISTINCT status,pjname,pdname,pdmode F rom {workshopbook}"
dt3 = cmd3.ExecuteReader()
e.Form.Controls("TreeView-workshopbook").BuildTree(dt3, "status|pjname|pdname|pdmode")
e.Form.Controls("TreeView-workshopbook").Nodes.insert("Node0","加载全部数据",0)