Verzeichnis auslesen und in tabelle schreiben

Tach auch…
komme hier nicht weiter und brauche eure Hilfe !!!

Ich lasse derzeit ein Verzeichniss auslesen und die einzelnen Dateinamen nebst Pfad in ein Textfeld schreiben. Ich möchte nun,
das genau das Zeile für Zeile ebenfalls in eine vorhandene Tabelle geschrieben wird.

Kann da jemand weiterhelfen…
…openrecordset und dann?

Vorab schon mal vielen Dank
Gruss MiB

Tach auch, MiB!

Ich lasse derzeit ein Verzeichniss auslesen und die einzelnen
Dateinamen nebst Pfad in ein Textfeld schreiben. Ich möchte
nun,
das genau das Zeile für Zeile ebenfalls in eine vorhandene
Tabelle geschrieben wird.

Kann da jemand weiterhelfen…
…openrecordset und dann?

Ist doch schon was:

...
 set recDaten=dbDeineDatenbank.OpenRecordset("tblDeineDateien")
 ' Hier Deine Schleife
 strDatei = Dir("\*.\*")
 do while strDatei""
 recDaten.AddNew
 recDaten("Datei")=strDatei
 ' ... vielleicht noch andere Felder? Feldname "Datei" ggf. anpassen
 recDaten.Update
 ' Hier das mit Deinem Textfeld, falls benötigt
 strDatei = Dir()
 loop

Wie immer ungetestet/uncompiliert. Aber so in etwa sollte es passen.

Gruß, Manfred

Hallo Manfred,
vielen Dank.
Viele Wege führen nach Rom und einen habe ich gefunden.
Allerdings ist Deine Lösung deutlich schlanker…
Werde ich beim nächsten Anlauf übernehmen.
Vielen Dank.
nd
MiB

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]