SELECT VIP消费信息.购买日期 AS "日期", VIP消费信息.门市专柜编号 AS "门市专柜编号", VIP消费信息.门市专柜简称 AS "门市专柜简称", SUM(VIP消费信息.实收金额) AS "VIP销售额", 门店整体销售额.门店整体销售额 AS "门店整体销售额" ,SUM(VIP消费信息.实收金额)/门店整体销售额.门店整体销售额 AS "VIP销售占比",COUNT(DISTINCT VIP消费信息.VIP卡号) AS "VIP销售笔数",SUM(VIP消费信息.数量) AS "VIP销售件数", SUM(VIP消费信息.实收金额)/COUNT(DISTINCT VIP消费信息.VIP卡号) AS "VIP客单价", SUM(VIP消费信息.实收金额)/SUM(VIP消费信息.数量) AS "VIP物单价", SUM(VIP消费信息.实收金额)/COUNT(DISTINCT VIP消费信息.VIP卡号)/SUM(VIP消费信息.实收金额)/SUM(VIP消费信息.数量) AS "VIP连带率"
FROM (dbo.VIP消费信息 AS VIP消费信息
INNER JOIN dbo.门店整体销售额 AS 门店整体销售额 ON (VIP消费信息.购买日期 = 门店整体销售额.购买日期 and VIP消费信息.门市专柜编号 = 门店整体销售额.门市专柜编号 ))
GROUP BY VIP消费信息.购买日期, VIP消费信息.门市专柜编号, VIP消费信息.门市专柜简称, 门店整体销售额.门店整体销售额
我想在这个表的旁边加一个 加载树，照着帮助了，窗口的After Load 代码如下：
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT DISTINCT Year(日期) As 年, Month(日期) As 月, 门市专柜编号 From {经营成果分析_经营成果分析}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt, "年|月|门市专柜编号")
也设置了目录树的代码：
Dim Value()As String
Dim Filter As String
Value = e.Node.FullPath.Split("\")
Select Case e.Node.Level
Case 0
Filter ="Year(日期) = " & Value(0)
Case 1
Filter ="Year(日期) = " & Value(0) & " And Month(日期) = " & Value(1)
Case 2
Filter ="Year(日期) = " & Value(0) & " And Month(日期) = " & Value(1) & " And 门市专柜编号 = '" & Value(2) & "'"
End Select
DataTables("经营成果分析_经营成果分析").LoadFilter = Filter
DataTables("经营成果分析_经营成果分析").Load()
应用窗口时显示：
对象名 '经营成果分析_经营成果分析' 无效。
错误代码位置：窗口，经营成果分析，After Load
是什么情况呢？
cmd.CommandText = "SELECT DISTINCT Year(日期) As 年, Month(日期) As 月, 门市专柜编号 From {经营成果分析_经营成果分析}"
表名不是这样写吗？
加好友 
发短信
Post By：2014/1/28 9:05:00 [显示全部帖子]
