- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- table控件 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=39629)
-- 发布时间：2013/8/28 16:49:00
-- table控件
所有的操作是基于打开项目第一次点"统计"
table控件加载数据报错：Tables("Form月实收统计_Table1").Fill(strsql,ConnectDB,True)
错：
此主题相关图片如下：2-2.png
第二次点“统计”出来
此主题相关图片如下：1-1.png
另外SQL"
Select distinct c.管理处编号 ,c.管理处,a.管理区id,a.管理区名称,a.收费项目类别, a.物业项目类别名称 ,a.收欠, a.本月实收
from
(Select t.管理区id,t.管理区名称,t.收费项目类别,
Case when t.收费项目类别 = \'1\' then \'物业管理费\'
when t.收费项目类别 = \'2\' then \'电费\'
when t.收费项目类别 = \'3\' then \'水费\'
End As 物业项目类别名称 ,
t1.收欠 ,isnull(t1.收欠,0) As 本月实收
from
(Select distinct a.管理区id,c.管理区名称,a.收费项目类别
from
( Select id,管理区id,本月应收,已收金额,收费项目类别 from 应收款 where 年月 < \'201301\') a
inner join
( Select distinct 应收款id from 应收款核销,收款 where 收款.id =应收款核销.收款id And left(CONVERT(varchar(10),收款日期,112),6) between \'201301\' and \'201308\') b on a.id = b.应收款id
inner join 管理区 c on a.管理区id = c.id
union
Select a.管理区id,c.管理区名称,收费项目类别
from
( Select id,管理区id,本月应收,已收金额,收费项目类别 from 应收款 where 年月 between \'201301\' and \'201308\') a
inner join
( Select distinct 应收款id from 应收款核销,收款 where 收款.id =应收款核销.收款id And left(CONVERT(varchar(10),收款日期,112),6) between \'201301\' and \'201308\') b on a.id = b.应收款id
inner join 管理区 c on a.管理区id = c.id
union
Select a.管理区id,c.管理区名称,收费项目类别
from
( Select id,管理区id,本月应收,已收金额,收费项目类别 from 应收款 where 年月 > \'201308\') a
inner join
( Select distinct 应收款id from 应收款核销,收款 where 收款.id =应收款核销.收款id And left(CONVERT(varchar(10),收款日期,112),6) between \'201301\' and \'201308\') b on a.id = b.应收款id
inner join 管理区 c on a.管理区id = c.id ) t
left join
(Select a.管理区id,a.管理区名称,a.收费项目类别,sum(收欠) As 收欠
from
(Select distinct a.id,a.管理区id,c.管理区名称,a.收费项目类别,
Case when 收费项目类别 = \'1\' then \'物业管理费\'
when 收费项目类别 = \'2\' then \'电费\'
when 收费项目类别 = \'3\' then \'水费\'
End As 物业项目类别名称 ,
isnull(a.已收金额,0) As 收欠
from
( Select id,管理区id,本月应收,已收金额,收费项目类别 from 应收款 where 年月 < \'201308\') a
inner join
( Select distinct 应收款id from 应收款核销,收款 where 收款.id =应收款核销.收款id And left(CONVERT(varchar(10),收款日期,112),6) = \'201308\') b on a.id = b.应收款id
inner join 管理区 c on a.管理区id = c.id) a group by a.管理区id,a.管理区名称,a.收费项目类别) t1 on t.管理区id = t1.管理区id And t.收费项目类别 = t1.收费项目类别
) a
inner join 管理区 b on a.管理区id = b.id
inner join ( Select distinct id As 管理处编号 ,部门简称 As 管理处 from 部门 where 部门层级 = 3 ) c on b.管理处id = c.管理处编号
还有不报错的情况是将: "c.管理处编号 ,c.管理处," 去掉不会报错
此主题相关图片如下：0-0.png
是不是你的table控件加载数据有限制？？？？？
-- 发布时间：2013/8/28 17:02:00
--
更新最新版本.