1

MS-Accessでは、更新と削除のカスケード、およびDDLを使用したそれらの作成などの参照整合性ルールを認識しています。

しかし、テーブルがすでに作成された後、これらを再度リストするにはどうすればよいでしょうか。

4

1 に答える 1

3

VBAでは、TableDefsコレクションとRelationsコレクションを使用して、テーブルとリレーションシップのプロパティを表示できます。ADOスキーマを使用して情報を取得することもできます。

特に、関係の属性を参照する必要があります。

Name                    Value       Description
dbRelationDeleteCascade 4096        Deletions cascade
dbRelationDontEnforce   2           Relationship not enforced (no referential integrity)
dbRelationInherited     4           Relationship exists in the database containing the two linked tables
dbRelationLeft          16777216    Microsoft Access only. In Design view, display a LEFT JOIN as the default join type.
dbRelationRight         33554432    Microsoft Access only. In Design view, display a RIGHT JOIN as the default join type.
dbRelationUnique        1           One-to-one relationship
dbRelationUpdateCascade 256         Updates cascade

http://msdn.microsoft.com/en-us/library/bb225809.aspx

Dim rel As Relation
Dim tdf As TableDef

For Each rel In CurrentDb.Relations
    Debug.Print rel.Attributes
Next

4352 = dbRelationUpdateCascade + dbRelationDeleteCascade

于 2012-10-22T14:54:18.340 に答える