如何在创建表关系时更改连接类型，访问VBA

Question

我在Access vba中使用代码add constraint ...foreign key...references..创建了表之间的关系。但它对连接类型没有任何作用，因为默认连接类型仍然是内连接。

如何在创建表之间的关系时在Access vba中定义连接类型？

感谢

Answer 1

如果要指定此类内容，则需要使用DAO，而不是SQL。

用于创建在两个表中名为ID的字段上将Table1连接到Table2的关系的示例代码，没有参照完整性：

Dim rel As New Relation
Dim db As DAO.Database
Set db = CurrentDb()
rel.Attributes = dbRelationDontEnforce + dbRelationRight
rel.Name = "MyRelation"
rel.Table = "Table1"
rel.ForeignTable = "Table2"
Dim fld As DAO.Field
Set fld = rel.CreateField("ID")
fld.Name = "ID"
fld.ForeignName = "ID"
rel.Fields.Append fld
db.Relations.Append rel