使用SQLDDL创建、删除表和关系
若要建立一个字段Id为自动编号数据类型的主键,字段MyText的文本数据类型长度为10的表,可以在查询的数据定义查询窗口中输入以下语句:
注意:在以下查询示例中,每行末尾的下划线(_)用于延续该行。创建查询时,移除。
创建表Table1 (Id计数器约束PrimaryKey主键,_
MyText TEXT (10))
通过运行以下不带PrimaryKey的查询语句,可以在关系的另一端创建外键。该查询创建了一个具有长整型字段Id和文本类型字段MyText(默认长度为255)的表。
创建表格Table2 (Id LONG,MyText TEXT)
创建这两个表后,在Table1和Table2之间运行以下查询,以创建一对多关系,其中Table1是关系的主方。
ALTER TABLE Table2添加约束关系1外键([Id]) _
引用表1 ([Id])
若要删除这两个表之间的关系,可以使用以下查询:
更改表Table2删除约束关系1
若要删除表Table1,可以运行以下查询:
删除表表1
若要删除表Table2,可以运行以下查询:
删除表表2
除了通过查询运行这些语句名之外,还可以在RunSQL中以代码的形式运行DDL语句,或者可以通过下面的过程模拟它们。
sub execute sqlddl(SQLString As String)
Dim db As Database,qd As query def
Set db = DBEngine。工作区(0)。数据库(0)
设置qd = db。CreateQueryDef(" "
qd。SQL = SQLString
qd。执行
db。关闭
结束Sub
使用以下语法调用此过程:
ExecuteSQLDDL "删除表Table1"
0条评论