Visual Basic - crear relaciones

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

crear relaciones

Publicado por ricaurte (313 intervenciones) el 29/08/2003 22:55:25
hola como puedo crear relaciones entre tablas de access usando ADOX
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:crear relaciones

Publicado por Cecilia Colalongo (3116 intervenciones) el 30/08/2003 15:08:33
Fijate 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 respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar