по поводу объекта Relation

[toozik]

Скажем, есть primary table Люди, и другая таблица Браки. В каждой записи во второй таблице есть 2 человека из первой. как создать такое отношение? для одного поля у меня получилось так:

Код: Выделить всё


    Set Rel1 = pDB.CreateRelation("first")
    Rel1.Table = "Люди"
    Rel1.ForeignTable = "Браки"
    Set Fr1 = Rel1.CreateField("peopleID")
    Fr1.ForeignName = "wedID1"
    Rel1.Fields.Append Fr1
    pDB.Relations.Append Rel1


как сюда присовокупить wedID2 еще?

[Gloom]

Для второго поля - второе отношение...

[toozik]

если я делаю второе отношение, когда я просматриваю отношения в Access я там вижу 3 последовательно связанных таблицы почему-то, в то время как если добавлять отношения вручную, добавляется стрелочка между таблицами. да и в описании объекта сказано, что для связи нескольких полей может применяться. только как это сделать я не нашел