Question

在MS Access中，我有一些报告在日期范围内使用一些查询来显示数据。查询使用别名，if，sum和avg函数，并连接多个表以获取其数据。

我想知道我是否可以使用一个包含所有必需字段的表的UNION ALL来显示此表中的这些新数据以及旧数据，如果有人选择了跨越该范围的范围新旧。

以下是“旧”查询示例：

SELECT tblAssessment.fldValid, tblATraining.fldTID, tblATraining.fldTCrsID, 
tblCourses.fldCrsName, [fldCrsHrs]/8 AS Days, tblATraining.fldTLocAbr, 
tblDistrict.fldDistAbr, tblRegion.fldRegName, tblATraining.fldTDateStart, 
tblATraining.fldTDateEnd, tblATraining.fldTEnrolled, tblATraining.fldTPID, 
tblPersonnel.fldPName, tblAssessment.fldTrngSID, tblAssessment.Q1, 
IIf([fldValid]=True,IIf([Q1]>0,1,0),0) AS Q1Valid, tblAssessment.Q2, 
IIf([fldValid]=True,IIf([Q2]>0,1,0),0) AS Q2Valid, tblAssessment.Q3, 
IIf([fldValid]=True,IIf([Q3]>0,1,0),0) AS Q3Valid, tblAssessment.Q4, 
IIf([fldValid]=True,IIf([Q4]>0,1,0),0) AS Q4Valid, tblAssessment.Q5, 
IIf([fldValid]=True,IIf([Q5]>0,1,0),0) AS Q5Valid, tblAssessment.Q6, 
IIf([fldValid]=True,IIf([Q6]>0,1,0),0) AS Q6Valid, tblAssessment.Q7, 
IIf([fldValid]=True,IIf([Q7]>0,1,0),0) AS Q7Valid, tblAssessment.Q8, 
tblAssessment.Q9, 
IIf([fldValid]=True,IIf([Q9]>0,1,0),0) AS Q9Valid, tblAssessment.Q10, 
IIf([fldValid]=True,IIf([Q10]>0,1,0),0) AS Q10Valid, tblAssessment.Q11, 
IIf([fldValid]=True,IIf([Q11]>0,1,0),0) AS Q11Valid, tblAssessment.Q12, 
IIf([fldValid]=True,IIf([Q12]>0,1,0),0) AS Q12Valid, tblAssessment.Q13, 
tblAssessment.Q14, 
IIf([fldValid]=True,IIf([Q14]>0,1,0),0) AS Q14Valid, tblAssessment.Q15, 
IIf([fldValid]=True,IIf([Q15]>0,1,0),0) AS Q15Valid, tblAssessment.Q16, 
IIf([fldValid]=True,IIf([Q16]>0,1,0),0) AS Q16Valid, tblAssessment.Q17, 
IIf([fldValid]=True,IIf([Q17]>0,1,0),0) AS Q17Valid, tblAssessment.Q18, 
IIf([fldValid]=True,IIf([Q18]>0,1,0),0) AS Q18Valid, tblAssessment.Q19, 
IIf([fldValid]=True,IIf([Q19]>0,1,0),0) AS Q19Valid, tblAssessment.Q20, 
tblAssessment.Q21, 
IIf([fldValid]=True,IIf([Q21]>0,1,0),0) AS Q21Valid, tblAssessment.Q22, 
IIf([fldValid]=True,IIf([Q22]>0,1,0),0) AS Q22Valid, tblAssessment.Q23, 
IIf([fldValid]=True,IIf([Q23]>0,1,0),0) AS Q23Valid, tblAssessment.Q24, 
IIf([fldValid]=True,IIf([Q24]>0,1,0),0) AS Q24Valid, tblAssessment.Q25, 
IIf([fldValid]=True,IIf([Q25]>0,1,0),0) AS Q25Valid, tblAssessment.Q26, 
IIf([fldValid]=True,IIf([Q26]>0,1,0),0) AS Q26Valid, tblAssessment.Q27, 
IIf([fldValid]=True,IIf([Q27]>0,1,0),0) AS Q27Valid, tblAssessment.Q28, 
IIf([fldValid]=True,IIf([Q28]>0,1,0),0) AS Q28Valid, tblAssessment.Q29, 
tblAssessment.Q30, 
tblAssessment.Q31, tblAssessment.Q32
FROM ((tblDistrict 
       LEFT JOIN tblRegion ON tblDistrict.fldDRegID = tblRegion.fldRegID) 
       RIGHT JOIN (((tblATraining 
                     LEFT JOIN tblCourses ON tblATraining.fldTCrsID = tblCourses.fldCrsID) 
                   LEFT JOIN tblPersonnel ON tblATraining.fldTPID = tblPersonnel.fldPID) 
                  LEFT JOIN tblLocations ON tblATraining.fldTLocAbr = tblLocations.fldLID) ON tblDistrict.fldDistAbr = tblATraining.fldTDistAbr) 
     LEFT JOIN tblAssessment ON tblATraining.fldTID = tblAssessment.fldTrngCID
WHERE (((tblAssessment.fldValid)=True) 
        AND ((tblATraining.fldTCrsID) Like [forms]![fdlgRptCriteria].[selCrsCd]) 
        AND ((tblATraining.fldTDateStart) Between [forms]![fdlgRptCriteria].[seldate1] And [forms]![fdlgRptCriteria].[seldate2]) 
        AND ((tblAssessment.fldTrngSID) Is Not Null));

Answer 1

是，Access支持UNION ALL。一个简单的例子是：

select foo from OldData
union all
select foo from NewData

Answer 2

是的，但您可以考虑为联合创建一个新的querydef。

（我上次检查时你需要使用SQL设计窗口。）

大约是：

    SELECT
    tblATraining.fldTID,
    tblATraining.fldTCrsID,
    tblATraining.fldTLocAbr,
    tblATraining.fldTDateStart,
    tblATraining.fldTDateStart,
    tblATraining.fldTDateEnd,
    tblATraining.fldTEnrolled,
    tblATraining.fldTPID

    UNION ALL

    tblATrainingArchive.fldTID,
    tblATrainingArchive.fldTCrsID,
    tblATrainingArchive.fldTLocAbr,
    tblATrainingArchive.fldTDateStart,
    tblATrainingArchive.fldTDateStart,
    tblATrainingArchive.fldTDateEnd,
    tblATrainingArchive.fldTEnrolled,
    tblATrainingArchive.fldTPID

并将其命名为tblATrainingUnion。

然后只需将其插入现有查询中，无论您在哪里进行tblATraining。

注意：许多人也倾向于创建一个比真正有意义的存档表 - 您可能会考虑将其全部留在主表中，并在实际测量差异时进行拆分。（您可能已经达到了这一点并且已经完成了;并且使用Access比使用SQL Server更有意义。）

Answer 3

我会强调@le dorfier关于存档的评论。具有Jet数据存储的大多数Access应用程序不需要存档数据。我的一个客户为我在1997-98建造的6个停车库运行了一个计费系统（从那时起它已被广泛升级，扩展和修改）。它包括整个时期的数据（每个车库每月200-300张发票），现在它的工作速度和当时的速度一样快。其中一部分是PC的性能提升（即数据量和1997年代的PC数量相同，可能会非常慢），但它仍然可以正常运行。

如果速度开始出现问题，我们可能会将后端移到SQL Server Express。我们考虑的最后一件事就是归档数据。

我的另一位客户坚持存档他们的非活动数据，然后我不得不重新编程ADD NEW RECORD功能以检查存档（由于应用程序的要求，同一个人没有新记录至关重要创建，但改为从存档中检索它。这极大地减缓了添加新记录的过程。现在我试图说服他们“去存档”他们的数据，因为它实际上没有以任何方式帮助他们，并且在日常运营中使事情变得更慢。

Answer 4

两条与您的问题无关的评论。

1）Q1到Q32领域的目的是什么？我想也许那些可能会以某种方式重新设计和/或标准化。

2）我认为没有理由在对象名称上使用命名标准。如tbl，fld，frm，qry等。你几乎知道代码中的上下文是什么类型的对象。如果在各种数据库容器窗口中，这些也非常明显。

那就是说我在VBA代码中使用了变量命名约定只是为了帮助保持这些约定。

有关详细信息，请参阅Tony's Object Naming Conventions和Tony's Table and Field Naming Conventions。

我非常期待有些人强烈不同意我的第二条评论并大肆宣传我的帖子。

SQL Union All用新数据显示旧数据？

4 个答案: