DROP-Anweisung (Microsoft Access SQL)

Gilt für: Access 2013, Office 2013

Löscht eine vorhandene Tabelle, Prozedur oder Sicht aus einer Datenbank, oder löscht einen vorhandenen Index aus einer Tabelle.

Hinweis

Das Microsoft Access-Datenbankmodul unterstützt nicht die Verwendung der DROP-Anweisung oder anderer DDL-Anweisungen in Kombination mit Datenbanken, die nicht aus dem Microsoft Access-Datenbankmodul stammen. Verwenden Sie stattdessen die Delete-Methode für Datenzugriffsobjekte (DAO).

Syntax

DROP {TABLE Tabelle | INDEX Index ON Tabelle | PROCEDURE Prozedur | VIEW Sicht}

Die DROP-Anweisung setzt sich wie folgt zusammen:

Part	Beschreibung
Tabelle	Der Name der zu löschenden Tabelle oder der Tabelle, aus der ein Index gelöscht werden soll.
Prozedur	Der Name der zu löschenden Prozedur.
Sicht	Der Name der zu löschenden Sicht.
Index	Der Name des aus der Tabelle zu löschenden Indexes.

Bemerkungen

Sie müssen die Tabelle schließen, bevor Sie sie löschen oder einen Index daraus entfernen können.

Sie können auch die ALTER TABLE-Anweisung verwenden, um einen Index aus einer Tabelle zu löschen.

Die CREATE TABLE-Anweisung kann zum Erstellen einer Tabelle und die CREATE INDEX- oder ALTER TABLE-Anweisung zum Erstellen eines Indexes verwendet werden. Verwenden Sie die ALTER TABLE-Anweisung ebenfalls, wenn Sie eine Tabelle ändern möchten.

Beispiel

The following example assumes the existence of a hypothetical NewIndex index on the Employees table in the Northwind database.

This example deletes the index MyIndex from the Employees table.

    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

This example deletes the Employees table from the database.

    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