✔ Access SQL Datenbank löschen

[cfl2si]

Hallo zusammen,

gibt es eine Möglichkeit den kompletten inhalt einer Accesdatenbank zu löschen. Also alle Tabellen und abfragen.

drop database xyz

funktioniert ja leider nicht in Acces.

Hat jemand eine Idee

 

[andi_g69]

Wenn Du gar nichts aus der Datenbank erhalten willst, dann lösche einfach die .MDB Datei.

 

[cfl2si]

Hallo und Danke für deine Antwort.

Allerdings ist in der Datenbank ein sehr umfangreiches Modul was aus eines Textfile ein Datenbankschema erstellt. Das muss auf jeden Fall drinbleiben. Also ich habe mittlerweile einen Weg gefunden die Tabellen der Datenbank zu löschen. Allerdings ist diese Lösung sehr umständlich, da ich vorher nie wissen kann welche Tabellen aufgrund des Textfiles angelegt werden.
Mit Oracle wäre das ganze kein Problem, da gäbe es sogar mehrere Möglichkeiten. Deshalb hoffe ich noch auf eine zufriedenstellendere Lösung.

MFG

 

[andi_g69]

Dann schreib Dir doch ein Makro, dass alle Tabellen und Abfragen löscht:

Dim oDB As Database
Dim oTable As TableDef
Dim oQuery As Querydef

Set oDB = CurrentDB()

For Each oTable in oDB.TableDefs
oDB.TableDefs.Delete oTable.Name
Next

For Each oQuery in oDB.QueryDefs
oDB.QueryDefs.Delete oQuery.Name
Next

Set oTable = Nothing
Set oQuery = Nothing
Set oDB = Nothing


Achja: Ich bin mir nicht sicher ob Access nicht seine eigenen Systemtabellen mit löschen würde. Also packst Du um die Anweisung

oDB.TableDefs.Delete oTable.Name

Am besten noch eine Abfrage:
IF LEFT (oTable.Name, 3) <> "sys" Then
...
End If

 

[cfl2si]

Danke für deine Antwort,

so ähnlich hab ich es auch gemacht, blieb ja leider nicht anderes Übrig.

Grüße