Cómo eliminar una relación de una tabla

Por Enrique Martínez Montejo

Última revisión: 15/06/2003

Para eliminar el índice de una tabla, utilizaremos el método Delete de la colección Keys de un objeto Table.

El siguiente ejemplo, eliminará la relación con nombre Clientes_Facturas de nuestra base de datos:

Dim cat As ADOX.Catalog

' Creo un objeto Catalog
Set cat = New ADOX.Catalog

' Abrímos el catálogo
cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                       "Data Source = C:\Mis documentos\Mi base.mdb;"

' Hacemos referencia a la tabla que contiene la
' relación que deseamos eliminar
cat.Tables("Facturas").Keys.Delete ("Clientes_Facturas")

 

Otros enlaces de interés:

Cómo crear una base de datos Access

Cómo crear una tabla de Access

Cómo crear una relación entre dos tablas

Colección de ejemplos de la biblioteca de ADOX

---

Enrique Martínez Montejo - 2003

NOTA: La información contenida en este artículo, así como el código fuente incluido en el mismo, se proporciona COMO ESTÁ, sin garantías de ninguna clase, y no otorga derecho alguno. Usted asume cualquier riesgo al poner en práctica, utilizar o ejecutar lo explicado, recomendado o sugerido en el presente artículo.

NOTE: The information contained in this article and source code included therein, is provided AS IS without warranty of any kind, and confers no rights. You assume any risk to implement, use or run it explained, recommended or suggested in this article.