Set up relations between 2 entities (Access 2k, VB6)

[gwar2k1]

Hey, Im having troubles setting up relations using keys in Access 2000. This is the code i have:

Dim FolderRelation As New Relation
'FolderRelation.ForeignTable = DbaseCat.Tables("Customer&quot
'FolderRelation.Table = DbaseCat.Tables("CustomerProduct&quot
FolderRelation.Name = "Order"
'FolderRelation.Fields.Append "Folder"

Everything is commented out because at run time it says "Type miss match error" So im stumped, how can it be a type error when the variable is set as a relation?

Im probabally doing this totally wrong as Im doing it without direction and I cant find a good tutorial online, hence the numerous questions on this board.

If it helps:

I have 3 entities: Product, Customer, CustomerProduct
Product has a primary key: "EAN 8/13"
Customer has a primary key: "Folder"
CustomerProduct has a compound key: "Order ID", "Folder", "Product"

CustomerProduct resolves a many to many relationship so customer and product both go one to many to customerproduct

A point in the right direction would be nice =)

TIA

~*Gwar3k1*~
"To the pressure, everything's just like: an illusion. I'll be losing you before long..."