Question

Access不能删除表,它加入了一个或多个关系

各位高手们我在VBA模块里面写了DoCmd.DeleteObject acTable, "资产"但显示的它加入了一个或多个关系，如果一定要在模块里写代码删，那该怎么改呢？别说在表关系里面，右键把关系的黑线删了多谢各位高手





Answer 1

对于 一个 已经关联到其他表字段的 字段 数值类型 修改 要极其慎重！

如果你确实要修改的话，首先 要 在关系视图中 把这个字段 与其他表的 关系删除！然后再修改、删除……

但是 要注意 修改字段的 数据类型 原有表中的数据 要受到相应的影响哦…………

关系 在 关系视图中 选中 右键 删除……

追问

(⊙﹏⊙)b，大神，你的方法是不错，但我问的是怎么写代码删除，在VBA里面，DoCmd.DeleteObject acTable, "资产"我这样写的，但是显示有关系删不了，我又不想在：关系视图中 选中 右键 删除。如果一定要在代码里面删，该怎么办呢？

追答

用alart，这方面的示例：
以下就是示例：
用 DDL 的 Create Table 建立一个表 Table1 ，主键是自动编号字段，另一个字段是长度是 10 的文本字段。
CREATE TABLE Table1 (Id COUNTER CONSTRAINT PrimaryKey PRIMARY KEY, MyText TEXT (10))

再建一个包含两个字段的表 Table2，字段 id 为长整型，字段 MyText 为文本
CREATE TABLE Table2 (Id LONG, MyText TEXT)

用以下语句建立 Table1 和 Table2 的一对多关系：
ALTER TABLE Table2 ADD CONSTRAINT Relation1 FOREIGN KEY ([Id]) REFERENCES Table1 ([Id])

删除关系用以下语句：
ALTER TABLE Table2 DROP CONSTRAINT Relation1

删除 Table1 用以下语句：
DROP TABLE Table1

设定某字段为主键
ALTER TABLE 表1 ALTER COLUMN [id] COUNTER CONSTRAINT MyPrimaryKey PRIMARY KEY

增加一个字段 MySalary
alter table AAA add COLUMN MySalary CURRENCY

删除一个字段 MySalary
alter table AAA drop COLUMN MySalary