Löschen

Hallo, Winfried und Schöne Feiertage nach Bayern!!

...

For Each Tabelle in db.TableDefs
If Tabelle.Name = "DeineTab" then
db.tabledefs.delete(Tabelle.Name)
end if
next Tabelle
...

3 ergänzende Hinweise:



1. Vorsicht vor der vorwärtsschleifenden Löschaktion! Das klappt zuverlässig nur für 1 zu löschendes Objekt, sonst wird - wie im Winter üblich - nachgerutscht. s.a.

https://groups.google.com/forum/#!original/microsoft.public.de.access/PtDQcDGvwMk/3Z7TC069ACMJ



2. Besser das Löschen nicht innerhalb der Schleife durchführen, sondern die Existenzprüfung in eine Funktion auslagern. s.a.
http://www.donkarl.com?FAQ3.4



3. Für Abfragen das gleiche mit QueryDefs statt TableDefs.

...Wenn Du öfters Tabellen oder Abfragen löschen möchtest, würde ich...

mir überlegen, ob das wirklich notwendig ist. Objekte löschen und neu erstellen heißt Stress für den Datenbankcontainer. Bei Tabellen ist das nur nötig, wenn sich die Struktur gröber ändert. Falls es hingegen nur um die Daten geht, ist es besser, die Tabelle
per Löschabfrage zu leeren und per Anfügeabfrage neu zu befüllen.



Bei Abfragen ist das Löschen und Neuerstellen nicht so tragisch. Alternativ kann man aber auch die SQL-Eigenschaft (s. F1) umschreiben.

Hallo,

ob ein Element existiert könntest Du z.B. über die MSYSObjects - Tabelle mit einem simplen "Select Type FROM MSysObjects WHERE Name = 'qdyGebliste_mHB'" heraus bekommen. Aber versuche es einfach mit einem "On Error Resume Next" for der Deleteanweisung das
spart das überprüfen ob ein Element da ist wenn Du es doch sowieso löschen möchtest.

Ich bevorzuge übrigens currentdb.execute "DROP TABLE qdyGebliste_mHB". Liegt aber nur daran das ich docmd nicht mag DROP TABLE heißt es übrigens auch für Abfragen.

Viel Erfolg

Mike

Hallo

Danke für die Bestätigung.

Verwenden Sie dies für privat oder beruflich?

Der Grund, warum ich frage, ist zu klären, ob eine Arbeits-IT-Abteilung die Optionen eingeschränkt hat, und als solches ist dies der Grund, warum sie nicht in der Lage sind, sie auszuwählen.

Ich freue mich darauf, für Sie zu hören.

Herzliche Grüße

Tim

Diese Antwort ist automatisch übersetzt worden. Daher kann sie grammatikalische Fehler oder fremde Ausdrücke enthalten.
<br />

Hallo Emma R,

Mein Name ist Tim und es tut mir leid zu sehen, dass Sie Probleme mit OneNote haben. Gerne unterstütze ich Sie heute.

Können Sie bestätigen, ob es sich bei dem von Ihnen verwendeten Computer um einen PC oder einen Arbeits-/Schulcomputer handelt?

Ich freue mich darauf, von Ihnen zu hören.

Herzliche Grüße

Tim

Diese Antwort ist automatisch übersetzt worden. Daher kann sie grammatikalische Fehler oder fremde Ausdrücke enthalten.
<br />

Am 19.12.2013 schrieb Karl Donaubauer [MVP]:

Hallo, Winfried und Schöne Feiertage nach Bayern!!

Servus Karl,

ebenfalls schöne Feiertage nach Wien!

For Each Tabelle in db.TableDefs
If Tabelle.Name = "DeineTab" then
db.tabledefs.delete(Tabelle.Name)
end if
next Tabelle
...

3 ergänzende Hinweise:



1. Vorsicht vor der vorwärtsschleifenden Löschaktion! Das klappt zuverlässig nur für 1 zu löschendes Objekt, sonst wird - wie im Winter üblich - nachgerutscht.

s.a.https://groups.google.com/forum/#!original/microsoft.public.de.access/PtDQcDGvwMk/3Z7TC069ACMJ

Ich hab so etwas ähnliches ja auch, aber gestern nicht gefunden.

-- HTHKarl*********Access-FAQ (German/Italian):
http://www.donkarl.com

BTW: Du weißt dass es die Bridge auch für die Answer Foren gibt? Wenn

nicht, hier die URL:
http://communitybridge2.codeplex.com/

Servus

Winfried

WSUS Package Publisher:
http://wsuspackagepublisher.codeplex.com/

HowTos zum WSUS Package Publisher
http://www.wsus.de/lup/

GPO's: http://www.gruppenrichtlinien.de

NNTP-Bridge für MS-Foren:
http://communitybridge.codeplex.com/

NNTP-Bridge für Answer-Foren:
http://communitybridge2.codeplex.com/