如何在程序中新建一个ACCESS文件? 如何在程序中给一个ACCESS表改名?

Question

我现在需要导出一个ACCESS表到另一个地方,
但文件可能是不存在的,所以我希望如果文件不存在的话,就生成一个新的MDB文件(在程序中)同时,在导出过程中,如果指定的文件中已经有同名的表了,我将把那个表的名字改掉,比如 A 改为 A_BAK, 然后再进行导入
请问如何在程序中给一个表改名?

Answer 1

1、DAO,创建库
dim newdb As Database
Set newdb = CreateDatabase("C:\aa.mdb", dbLangChineseSimplified)2、如何判断一个表是否存在，可访问access的系统表sysobjects，系统表默认情况下是隐藏的，可以在菜单：工具－选项－视图－“隐藏对象”上打勾。
sysobjects表结构一看就明白。3、改表名：思路 先复制 再删除
select * into 新表 from 旧表
以上的语句在创建“新表”表结构的同时，也把数据从“旧表”中复制过去4、删除旧表：drop table