Seite 1 von 1
[GELÖST] Alle Tabelleninhalte einer DB löschen
Verfasst: Mo 25. Feb 2013, 17:58
von wartburgritter
Guten Tag zusammen,
weiss jemand, wie ich mit wenig Aufwand alle Tabelleninhalte einer Datenbank löschen kann um bsp. die Datenbank hier hochzuladen, weil ich eine Strukturfrage zur Datenbank habe?
gruss der wartburgritter
Re: Alle Tabelleninhalte einer DB löschen
Verfasst: Mo 25. Feb 2013, 20:41
von RobertG
Hallo Wartburgritter,
Du musst über Extras → SQL für jede Tabelle den folgenden Code eingeben:
Wenn Du entsprechende Verknüpfungen über Extras → Beziehungen definiert hast und die so eingestellt hast, dass die Beziehungen zwischen den Tabellen beim Löschen gewahrt werden, dann klappt das Ganze einwandfrei - auch wenn Du gar keine Beziehungen definiert hast.
Gruß
Robert
Re: Alle Tabelleninhalte einer DB löschen
Verfasst: Mo 25. Feb 2013, 21:17
von gogo
oder so:
<klugscheiss_an>
Code: Alles auswählen
Sub Main
oTNames() = thisdatabasedocument.CurrentController.Model.DataSource.Tables.ElementNames()
oStatement = ThisDatabaseDocument.CurrentController.ActiveConnection.createStatement
for i = ubound(oTNames()) to lbound(oTNames()) step -1
oStatement.executeQuery ("Delete from """ & oTNames(i) & """")
next i
End Sub
<klugscheiss_aus>
... wobei Du bei definierten Beziehungen Probleme bekommst, falls Du die Parents vor den Childs löschen willst (daher step-1)!