Compartir a través de


Instrucción DROP (Microsoft Access SQL)

Se aplica a: Access 2013, Office 2013

Elimina una tabla, procedimiento o vista existente de una base de datos o elimina un índice existente de una tabla.

Nota:

[!NOTA] El motor de base de datos de Microsoft Access no admite el uso de DROP, ni las instrucciones DDL, con bases de datos que no sean del motor de base de datos de Microsoft Access. En su lugar, use el método Delete de DAO.

Sintaxis

DROP {TABLE tabla | INDEX índice ON tabla | PROCEDURE procedimiento | VIEW vista}

La instrucción DROP consta de las siguientes partes:

Part

Descripción

tabla

El nombre de la tabla que se va a eliminar o la tabla desde la que se va a eliminar un índice.

procedimiento

El nombre del procedimiento que se va a eliminar.

ver

El nombre de la vista que se va a eliminar.

índice

El nombre del índice que se va a eliminar de tabla.

Comentarios

Debe cerrar la tabla antes de poder eliminar o quitar un índice de ella.

También puede usar ALTER TABLE para eliminar un índice en la tabla.

Puede usar CREATE TABLEpara crear una tabla y CREATE INDEX o ALTER TABLE para crear un índice. Para modificar una tabla, use ALTER TABLE.

Ejemplo

En el siguiente ejemplo, se supone la existencia de un índice hipotético NewIndex en la tabla Employees de la base de datos Neptuno.

En este ejemplo, se elimina el índice MyIndex de la tabla Employees.

    Sub DropX1() 
     
        Dim dbs As Database 
     
        ' Modify this line to include the path to Northwind 
        ' on your computer. 
        Set dbs = OpenDatabase("Northwind.mdb") 
     
        ' Delete NewIndex from the Employees table. 
        dbs.Execute "DROP INDEX NewIndex ON Employees;" 
     
        dbs.Close 
     
    End Sub

En este ejemplo se elimina la tabla Employees de la base de datos.

    Sub DropX2() 
     
        Dim dbs As Database 
     
        ' Modify this line to include the path to Northwind 
        ' on your computer. 
        Set dbs = OpenDatabase("Northwind.mdb") 
     
        ' Delete the Employees table. 
        dbs.Execute "DROP TABLE Employees;" 
     
        dbs.Close 
     
    End Sub