以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  自动生成目录树  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=69708)
--  作者：whuan1027
--  发布时间：2015/6/9 16:41:00
--  自动生成目录树

各位高手：

     我的项目Access是外部数据源,初始不加载数据，对一个表自动生成目录树后，报错。请问是怎么回事呢？

  代码如下：Dim cmd As New SQLCommand
 Dim dt As DataTable
 cmd.CommandText = "SELECT DISTINCT  产品名称,产品型号 F rom {BOM}"
dt = cmd.ExecuteReader()
 Dim trv As WinForm.TreeView = e.F orm.Controls("TreeView-BOM")
 trv.BuildTree(dt,"产品名称|产品型号")
trv.Nodes.Insert("加载所有数据",0)

提示错误是：Microsoft Jet 数据库引擎找不到输入表或查询 \'~TMPCLPBOM\'。 确定它是否存在，以及它的名称的拼写是否正确。
--  作者：Bin
--  发布时间：2015/6/9 16:42:00
--  
没有指定数据源
--  作者：gryy
--  发布时间：2015/6/9 16:43:00
--  
Dim cmd As New SQLCommand
cmd.ConnectionName = "数据库名"
 Dim dt As DataTable
 cmd.CommandText = "SELECT DISTINCT  产品名称,产品型号 F rom {BOM}"
dt = cmd.ExecuteReader()
 Dim trv As WinForm.TreeView = e.F orm.Controls("TreeView-BOM")
 trv.BuildTree(dt,"产品名称|产品型号")
trv.Nodes.Insert("加载所有数据",0)
--  作者：whuan1027
--  发布时间：2015/6/9 16:51:00
--  
谢谢！