Instrução DROP (Microsoft Access SQL)

Aplica-se ao: Access 2013, Office 2013

Exclui uma tabela, procedimento ou modo de exibição existente de um banco de dados ou exclui um índice existente de uma tabela.

Observação

[!OBSERVAçãO] O mecanismo de banco de dados do Microsoft Access não oferece suporte ao uso de DROP nem de nenhuma instrução DDL, com os bancos de dados cujos mecanismos sejam diferentes do Microsoft Access. Use os métodos Delete do ADO no lugar.

Sintaxe

DROP {TABLE tabela | INDEX índice ON tabela | PROCEDURE procedimento | VIEW exibição}

A instrução DROP tem as seguintes partes:

Sair	Descrição
table	O nome da tabela a ser excluída ou tabela da qual um índice será excluído.
procedimento	O nome do procedimento a ser excluído.
exibição	O nome do modo de exibição a ser excluído.
índice	O nome do índice a ser excluído da tabela .

Comentários

Você deve fechar a tabela antes de excluir ou remover um índice dela.

Você também pode usar ALTER TABLE para excluir um índice de uma tabela.

Você pode usar CREATE TABLE para criar uma tabela e CREATE INDEX ou ALTER TABLE para criar um índice. Para modificar uma tabela, use ALTER TABLE.

Exemplo

O exemplo a seguir considera a existência de um índice NewIndex hipotético na tabela Funcionários no banco de dados Northwind.

Este exemplo exclui o índice MyIndex na tabela Funcionários.

    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

Este exemplo exclui a tabela Funcionários do banco de dados.

    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