Private Sub mnuallcount_Click()
If Not DEnv.rsCommand17.State = adStateClosed Then DEnv.rsCommand17.Close
DEnv.rsCommand17.Open "select 汇总.CNum, 客户资料.房号, 客户资料.建筑面积, 客户资料.收款方式, 客户资料.发票, 客户资料.备注, 客户资料.合同价格, sum(汇总.贷方) as 已收 from 汇总 inner join 客户资料 on 汇总.CNum = 客户资料.CNum group by 汇总.CNum, 客户资料.合同价格, 客户资料.房号, 客户资料.建筑面积, 客户资料.收款方式, 客户资料.发票, 客户资料.备注 order by 房号", db, adOpenStatic, adLockOptimistic
DEnv.rsCommand17.Requery
DoEvents
allcount.Show
DEnv.rsCommand17.Close
End Sub==========================================================请问,如何在以上语句中加多一个判断为“合同价格 >= 已收”
If Not DEnv.rsCommand17.State = adStateClosed Then DEnv.rsCommand17.Close
DEnv.rsCommand17.Open "select 汇总.CNum, 客户资料.房号, 客户资料.建筑面积, 客户资料.收款方式, 客户资料.发票, 客户资料.备注, 客户资料.合同价格, sum(汇总.贷方) as 已收 from 汇总 inner join 客户资料 on 汇总.CNum = 客户资料.CNum group by 汇总.CNum, 客户资料.合同价格, 客户资料.房号, 客户资料.建筑面积, 客户资料.收款方式, 客户资料.发票, 客户资料.备注 order by 房号", db, adOpenStatic, adLockOptimistic
DEnv.rsCommand17.Requery
DoEvents
allcount.Show
DEnv.rsCommand17.Close
End Sub==========================================================请问,如何在以上语句中加多一个判断为“合同价格 >= 已收”
from ...
where 合同价格>=已收
group by ...
order by ...
from ...
where 合同价格>=已收
group by ...
order by ...
group by 汇总.CNum, 客户资料.合同价格, 客户资料.房号, 客户资料.建筑面积, 客户资料.收款方式, 客户资料.发票, 客户资料.备注 order by 房号
where 合同价格>='已收'
是临时生成的:sum(汇总.贷方) as 已收
早说清楚啊。select ...
from ...
group by ...
having 合同价格>=sum(汇总.贷方)
order by ...
狂晕!
WHERE 卫句中不能有合计函数
--------------------------------