Office: (Office 2007) Filesystem einlesen

Guten Morgen,

ich möchte aus Access heraus das Filesystem mit
Code:

in eine Access-Tabelle einlesen, also jede vorhandene Datei inkl. Pfad.

Im Moment schreibe ich alles per Hand mit o.g. Befehl in eine Datei und lese die Datei dann in Access ein.

Geht so etwas auch automatisch aus Access heraus? Wenn ja, gibt es ein Beispiel dafür oder eine kurze Anleitung, wie ich am besten vorgehe?

Vielen Dank und schöne Grüße
Anja

:)

 

Moin,
vielleicht kannst du diesen Code für dich anpassen:
Code:

maike

 

Tach!

Hatte letztens mehrere Server miteinander vergleichen müssen. Habe die Verzeichnis-Struktur und zusätzlich die Dateien eingelesen. Man kann auch über das frmMain die Struktur (dargestellt im TreeView) mehrfach laden.

Beispielaufruf im Testfenster:
call readStructure("D:\Musik\",False)

 

Guten Abend,

erst einmal Danke für die Rückmeldungen. Allerdings habe ich eine Implementierung in Access, die aber aufgrund der Größe des Filesystems viel zu langsam ist.

Der angegebene DOS-Befehl scheint ausreichend schnell zu sein.

Ich wollte nun den Aufrufvon Access aus starten und die Ausgabe in eine
Access-Tabelle umleiten.

Habt Ihr hierzu eine Meinung?

Vielen Dank und schöne Grüße
Anja

 

Hallo Anja,

Du könntest die Ausgabe des DIR-Befehls in eine Datei umleiten. Wie es geht findest Du hier:
http://www.ms-office forum.net/forum/newreply.php?do=postreply&t=287834
(Damit der Link funktioniert musst Du zwischen office und forum einen Bindestrich einfügen.)

Die Datei kannst Du dann einlesen und die Werte in eine Tabelle übertragen.
Ob Du damit schneller bist als mit dem anderen Code musst Du selber herausfinden. *wink.gif*

CU

 

Hallo!

Hat das Office-Forum nun neben der Blokade anderer Foren sich nun selbst gesperrt? *wink.gif*
Hinweis: Der Link funktioniert auch mit Bindestrich nicht.

@Anja

Warum werden solche wichtigen Anmerungen inklusive Code nicht im Eröffnungsbeitrag gemacht? *frown.gif*
Zum einen hatten sich Maike und Tost die Arbeit sparen können, zum anderen hätte man im Code nach Optimierungsmöglichkeiten gucken können. *rolleyes.gif*

Zum Umleiten in eine Datei: MS-DOS 6.22 Dir

Du solltest aber testen, ob dieser beim Schreiben der Ergebnisse in eine Datei und dem anschließenden Wiederauslesen immer noch schneller ist.

Das Verzeichnis mittels eines DOS-Befehls direkt in eine Accesstabelle einzulesen, wird dir IHMHO nicht gelingen.

 

Hallo Axel,

danke für den Hinweis. Da ist wohl einiges beim Kopieren schief gelaufen.

Dies ist der Link, den ich eigentlich meinte:
http://www.wer-weiss_was.de/theme30/article481645.html
(Zwischen weiss und was muss statt des Unterstrichs ein Bindestrich eingefügt werden.)

CU

 

Wenn es ohne den Umweg über DOS-Dir und maximal performant sein soll,
benutze APIs.

Wie´s gehen könnte siehst du z.B. hier:
VB-Tec / System / Datei / FindFiles - Kompletten Dateibaum durchsuchen
http://vbnet.mvps.org/index.html?cod...apicompare.htm

 

Ich habe gerade mal die Variante von vbtec getestet.
Superflott und nur zu empfehlen!

 

Guten Morgen,

erst einmal vielen Dank für die vielen Anregungen zum Eingangsthema: Dateien mit ihren Pfaden aus dem Filesystem zu ermitteln und in eine DB zu speichern.

Ich brauche nun etwas Zeit, um mir die verschiedenen Möglichkeiten anzusehen, und um herauszufinden, ob es einen geeigneten Weg für mich gibt.

Nichts desto trotz habe ich - falls ich es nicht überlesen habe - noch keinen Weg gesehen, der meinen DOS-Befehl zum Beispiel in einer bat-Datei per Knopfdruck aus Access heraus starten kann. (Denn das Einlesen einer mir bekannten Datei geht in Access problemlos.)

Wenn ich hierzu noch einen Tip bekommen könnte, wäre das große Klasse.

Wünsche Euch einen schönen Tag,

Anja

 

Wenn Deine Befehle in einer Textdatei namens dir.bat stehen: Code:

Die Pfadangabe ist relativ wichtig.

 

Guten Morgen,

das ging ja fix ;-)

Also, ich habe eine bat-Datei mit dem Eintrag
Code:

Wenn ich die Datei im Windows Explorer aufrufe, erzeugt sie die Datei "test.txt" mit den gewünschten Einträgen.

So weit, so gut.

Nun habe ich eine Access-Funktion:
Code:

Wenn ich diese Funktion aufrufe, z.B. im Direktfenster mit "a=erzeugeDatei()", dann blinkt kurz die Shell auf und "ready" wird ausgegeben.

ABER: Die Datei "test.txt" wird nicht erstellt und gefüllt.

Woran kann das liegen?

Gruß,
Anja

 

Hallo Anja,

in Deinem Batch musst Du für die Dateiausgabe den Pfad mit angeben.
Also etwas so:
Dir /B /S > C:\Test.txt

Außerdem arbeitet Shell asyncron; - VBA wartet also nicht, bis Shell seinen Job erledigt hat, was bei tiefen Pfad durchaus etwas dauern kann. Shell liefert aber eine Task-ID, wenn der Job korrekt gestartet wurde, was Du auswerten kannst:
lErg = Shell("c:\AT_Daten\dir.bat")

Hang loose, haklesoft

 

Hallo zusammen,

ja große Klasse - vielen Dank! Es funktioniert so, wie ich es brauche.

Tausend Dank an alle Mithelfer/innen!

Wünsche Euch einen traumhaften Tag

Anja

 

Hallo zusammen,

ich hatte zwar das Thema schon geschlossen, aber ich habe noch eine i-Tüpfelchen-Frage ;-)

Gibt es die Möglichkeit, dass mit die BAT-Datei ein Signal liefert, sobald sie durchgelaufen ist? Dann könnte ich aus Access heraus nach Abschluss des Einlesens die nächste Funktion anstoßen...

Vielen Dank und schöne Grüße
Anja