coli
Goto Top

MS Access - alle Tabellennamen in eine eigene Access-Tabelle schreiben

Hallo zusammen,

zuallererst, ich bin ein blutiger Anfänger mit ACCESS, aber es hat mich gepackt und ich möchte mehr wissen/können face-smile

Frage, ist es möglich, in ACCESS alle Tabellennamen auszulesen und diese in eine eigene Accesstabelle zu schreiben (Anfügen wenn es neue Tabellen gibt, bzw. nicht vorhandene zu löschen - eine Art von Updatemöglichkeit) ?

ich würde diesen Code bei Access Start starten wollen ...


Wenn ja, dann wäre ich für den Code sehr dankbar (und für eine Erklärung dazu, noch mehr) face-smile
DANKE

LG :: Coli

Content-ID: 6049771522

Url: https://administrator.de/forum/ms-access-alle-tabellennamen-in-eine-eigene-access-tabelle-schreiben-6049771522.html

Ausgedruckt am: 23.12.2024 um 00:12 Uhr

em-pie
Lösung em-pie 19.02.2023 um 22:14:40 Uhr
Goto Top
Moin,

Es müsste die MSysObjects schon fertig geben:
https://dataedo.com/kb/query/access/list-of-tables-in-the-database

Du brauchst das Rad somit nicht neu erfinden face-wink
coli
coli 20.02.2023 um 07:22:40 Uhr
Goto Top
Danke em-pie face-smile

Der SQL Code in einer Abfrage funktioniert sehr gut.

Gibt es auch einen eleganten Weg um das Ergebnis in eine eigene Tabelle zu schreiben (wie schon geschrieben, bin ein blutiger Anfänger) ?

Danke :: Coli
6017814589
6017814589 20.02.2023 um 07:41:35 Uhr
Goto Top
SELECT MSysObjects.name
INTO newtable
FROM MSysObjects
WHERE MSysObjects.type In (1,4,6)
   and MSysObjects.name not like '~*'     
   and MSysObjects.name not like 'MSys*'  
order by MSysObjects.name;
coli
coli 20.02.2023 aktualisiert um 08:08:20 Uhr
Goto Top
Zitat von @6017814589:

SELECT MSysObjects.name
INTO newtable
FROM MSysObjects
WHERE MSysObjects.type In (1,4,6)
   and MSysObjects.name not like '~*'     
   and MSysObjects.name not like 'MSys*'  
order by MSysObjects.name;

Danke Hagelschaden,

ja, diesen Code habe ich in einer Abfrage, das funktioniert sehr gut face-smile

Wenn ich das Ergebnis aber in einer Tabelle (anstatt in einer Abfrage) haben möchte - ist das auch möglich ?
Oder habe ich eure Hinweise missverstanden (ich lerne noch) ?

Nochmals, danke vorab.

EDIT:
Ich habe es gerade gesehen - INTO ... Kann man es auch in eine bestehende Tabelle füllen ?
6017814589
6017814589 20.02.2023 aktualisiert um 08:09:14 Uhr
Goto Top
Zitat von @coli:
Wenn ich das Ergebnis aber in einer Tabelle (anstatt in einer Abfrage) haben möchte - ist das auch möglich ?
Oder habe ich eure Hinweise missverstanden (ich lerne noch) ?
Was hast du an INTO newtable nicht verstanden ???
6017814589
Lösung 6017814589 20.02.2023 aktualisiert um 08:15:48 Uhr
Goto Top
Zitat von @coli:
EDIT:
Ich habe es gerade gesehen - INTO ... Kann man es auch in eine bestehende Tabelle füllen ?

INSERT INTO myexisitingtable (mycolumnname)
SELECT MSysObjects.name
FROM MSysObjects
WHERE MSysObjects.type In (1,4,6)
   and MSysObjects.name not like '~*'     
   and MSysObjects.name not like 'MSys*'  
order by MSysObjects.name;
https://www.w3schools.com/sql/sql_insert_into_select.asp
coli
coli 20.02.2023 um 08:19:42 Uhr
Goto Top
Zitat von @6017814589:

Zitat von @coli:
EDIT:
Ich habe es gerade gesehen - INTO ... Kann man es auch in eine bestehende Tabelle füllen ?

INSERT INTO myexisitingtable (mycolumnname)
SELECT MSysObjects.name
FROM MSysObjects
WHERE MSysObjects.type In (1,4,6)
   and MSysObjects.name not like '~*'     
   and MSysObjects.name not like 'MSys*'  
order by MSysObjects.name;
https://www.w3schools.com/sql/sql_insert_into_select.asp

DANKE, und danke für den Link, werde mich jetzt damit länger beschäftigen face-smile

Das Ziel ist, dass ich, wenn es neue Tabellen im Projekt gibt, dessen Namen in eine eigene Tabelle aufgenommen werden (angefügt werden).

LG :: Coli
6017814589
6017814589 20.02.2023 aktualisiert um 08:57:06 Uhr
Goto Top
Zitat von @coli
Das Ziel ist, dass ich, wenn es neue Tabellen im Projekt gibt, dessen Namen in eine eigene Tabelle aufgenommen werden (angefügt werden).
Tja warum einfach wenn es auch kompliziert geht 🤪. Alaaaaaf, Helau ...
140742
140742 20.02.2023 um 09:13:53 Uhr
Goto Top
OT: Immer ein guter Anlaufpunkt für Acces Tips&Tricks: https://www.donkarl.com/
coli
coli 20.02.2023 um 13:32:13 Uhr
Goto Top
Zitat von @140742:

OT: Immer ein guter Anlaufpunkt für Acces Tips&Tricks: https://www.donkarl.com/

DANKE, ich werde es mir gleich Bookmarken face-smile
coli
coli 20.02.2023 um 13:39:10 Uhr
Goto Top
Vielleicht doch noch eine Frage face-smile

Das mit der Anfüge-Abfrage läuft gut 👍

Wenn ich aber nur Updaten möchte, sprich, Duplikate vermeiden möchte, muss ich dann mit UPDATE SET; arbeiten ?

Natürlich freue ich mich auch über ein paar Codezeilen face-smile

Nochmals, danke vorab