使用Microsoft Access，VBA和SQL - 创建适当命名的备份表的最简单方法是什么

Question

我正在寻找一种使用VBA和/或SQL备份表的简单而有创意的方法。

我需要备份表名称，以包括备份表名称，备份的日期和时间以及备份时表所保留的记录数。

我正在使用......

    CurrentDb.Execute ("SELECT * INTO [tblName BU " & CStr(Format(Now(), "YYYYMMDD HHmmss")) & " Records=> " & CurrentDb.OpenRecordset("tblNameImBackingUp").RecordCount & "] FROM tblNameImBackingUp;")

有什么更好的吗？

Answer 1

你可以试试 Docmd.copyobject用于制作和精确复制。

Answer 2

  

简单而富有创意的方式

没有。你不想要创意。您想要可靠且易于阅读。当某些事情在未来6个月内发生并需要尽快修复时，您需要能够快速阅读代码并找出问题所在。

我的建议是将所有备份存储在一个表中，并在备份日期附加一个字段。 Insert查询看起来像：

Insert into [TblBackups]
    Select *, now() from [tblNameImBackingUp];

Answer 3

您可能希望查看INSERT INTO SQL语句

Answer 4

如果您想将备份存储在同一个数据库中，我同意Fred。如果要将其移出数据库，请查看DoCmd.TransferDatabase。