如何用查询自动备份表，每天需要产生一个以日期结尾的新表

huangyz_xy

大侠们，我需要每天备份一次表，如何让它自动化，而不是每次都需要手动改名？

liaug

[:34] [:22]

huangyz_xy

原帖由 红尘如烟 于 2008-6-15 09:03 发表
2楼的是生成表查询,如果只是把数据追加到已有的表中,把SQL语句改成追加查询就行了
要对已有表改名可以用Rename方法
FROM 语句后面的表名是数据来源表的名称,WHERE语句是对数据进行筛选的条件,也就是只把满足条件的 ...

----------------------------------------------------------------------------------------------------------------------------------------------------下面是实例：

红尘如烟

2楼的是生成表查询,如果只是把数据追加到已有的表中,把SQL语句改成追加查询就行了
要对已有表改名可以用Rename方法
FROM 语句后面的表名是数据来源表的名称,WHERE语句是对数据进行筛选的条件,也就是只把满足条件的数据追加到目标表
至于具体例子,你最好发个实例文件上来,不然重新做一个太麻烦

huangyz_xy

能不能详细一点呢？有点不太懂,
"FROM 表1 WHERE 条件"怎么用呢？
再说了，图中的生成表和追加表有执行的目标表，也就是图2中的表，这个怎么定义啊？
可以的话能举个例吗？

[ 本帖最后由 huangyz_xy 于 2008-6-14 20:35 编辑 ]

红尘如烟

在代码中通过RunSQL 方法和Execute方法生成表,就可以自动定义表名称了
Dim strTblName as String
Dim strSQL as String
strTblName ="非满功率小区明细表" & Format(Date,"mmdd")
strSQL="SELECT 字段1 字段2 字段3 字段4 INTO " & strTblName &  "FROM 表1 WHERE 条件"
CurrentDb.Execute strSQL