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-Key: 6049771522

Url: https://administrator.de/contentid/6049771522

Printed on: April 29, 2024 at 14:04 o'clock

Member: em-pie
Solution em-pie Feb 19, 2023 at 21:14:40 (UTC)
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
Member: coli
coli Feb 20, 2023 at 06:22:40 (UTC)
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
Mitglied: 6017814589
6017814589 Feb 20, 2023 at 06:41:35 (UTC)
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;
Member: coli
coli Feb 20, 2023 updated at 07:08:20 (UTC)
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 ?
Mitglied: 6017814589
6017814589 Feb 20, 2023 updated at 07:09:14 (UTC)
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 ???
Mitglied: 6017814589
Solution 6017814589 Feb 20, 2023 updated at 07:15:48 (UTC)
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
Member: coli
coli Feb 20, 2023 at 07:19:42 (UTC)
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
Mitglied: 6017814589
6017814589 Feb 20, 2023 updated at 07:57:06 (UTC)
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 ...
Mitglied: 140742
140742 Feb 20, 2023 at 08:13:53 (UTC)
Goto Top
OT: Immer ein guter Anlaufpunkt für Acces Tips&Tricks: https://www.donkarl.com/
Member: coli
coli Feb 20, 2023 at 12:32:13 (UTC)
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
Member: coli
coli Feb 20, 2023 at 12:39:10 (UTC)
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