Office中国论坛/Access中国论坛

标题: VBA中怎样生成临时表 [打印本页]

作者: yodong 时间: 2004-7-3 05:54
标题: VBA中怎样生成临时表
Private Sub Command18_Click()

On Error GoTo aa

Dim k3 As String

k3 = Me.subform.Form.RecordSource

Me.subform.SourceObject = ""

Me.subform.SourceObject = "frm返修单查询汇总-子窗体"

'MsgBox k3

Me.subform.Form.RecordSource = k3

'K3是一个窗体的记录源变量.且是SQL语句.

bb:

Exit Sub

aa:

Resume bb

End Sub

'K3是一个窗体的记录源变量.且是SQL语句.

如:SELECT dbo.tbl返修明细单.* FROM dbo.tbl返修明细单 where 故障类别 like'%元材料%'

现在我想把此数据源作为一临时表,在此基础上再查询.即汇总.

SELECT 产品型号, COUNT(产品编号) AS 维修数量

FROM K3

GROUP BY 产品型号

但是这样不行.请教我应该怎么做.谢谢!!

作者: 阿罗 时间: 2004-7-4 07:28
这位同学，K3是recordsource而不是table或者view，如何能select .... from K3呢。还不如直接写一个组合的SQL语句，把生成K3的SQL同最后的SELECT语句并在一起就好了。

作者: yodong 时间: 2004-7-7 03:14
谢谢阿罗版主.看来还要不断学习呀.

作者: Alashome 时间: 2015-7-2 15:05
good

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)