crear relacionesPublicado por ricaurte (313 intervenciones) el 29/08/2003 22:55:25hola como puedo crear relaciones entre tablas de access usando ADOXValora esta pregunta0Responder
RE:crear relacionesPublicado por Cecilia Colalongo (3116 intervenciones) el 30/08/2003 15:08:33Fijate con esto: Dim kyForeign As New ADOX.Key Dim cat As New ADOX.Catalog cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=c:\Program Files\Microsoft Office\" & _ "Office\Samples\Northwind.mdb;" kyForeign.Name = "CustOrder" kyForeign.Type = adKeyForeign kyForeign.RelatedTable = "Customers" kyForeign.Columns.Append "CustomerId" kyForeign.Columns("CustomerId").RelatedColumn = "CustomerId" kyForeign.UpdateRule = adRICascade cat.Tables("Orders").Keys.Append kyForeign Valora esta respuesta0Comentar