DIR mit Schleifen?

[LightningGirl]

Hallo,

Ich würde gern ein beliebig große Dateistruktur einlesen (alle Dateien), das Unterverzeichnis soll frei wählbar sein.
mit dem Befehl: DIR ("*",vbdirectory)
kann ich einen Teil einlesen, will ich die Funktion aber wiederholen (mit Hilfe einer Schleife) "vergisst" es wo es sich befindet.

Unter DOS gab es den Befehl:
DIR ++/s>text.text
Bei dem war das kein Problem.

Gibt es vielleicht einen Ersatzbefehl (statt DIR) der Schleifen mitmacht?

MFG

Lightning

 

[Retlaw]

So weit ich mir erinnere musst du Dir() nur einmal mit Pfad starten, beim nächsten Aufruf liefert er dir dann die weiteren Ergebnisse.

 

[Kantenpapst]

Original geschrieben von LightningGirl
Hallo,

Ich würde gern ein beliebig große Dateistruktur einlesen (alle Dateien), das Unterverzeichnis soll frei wählbar sein.
mit dem Befehl: DIR ("*",vbdirectory)
kann ich einen Teil einlesen, will ich die Funktion aber wiederholen (mit Hilfe einer Schleife) "vergisst" es wo es sich befindet.

Unter DOS gab es den Befehl:
DIR ++/s>text.text
Bei dem war das kein Problem.

Gibt es vielleicht einen Ersatzbefehl (statt DIR) der Schleifen mitmacht?

MFG

Lightning

Hallo!

Option Explicit
Dim A

Private Sub Command1_Click()
A = Dir
List1.AddItem (A)
End Sub

Private Sub Form_Load()
A = Dir("C:\*.*")
End Sub

Du mußt nur den Befehl DIR() aus der Schleife raushalten.

Bis dann, Florian

 

[LightningGirl]

Hi,

wollt mich nur nochmal bedanken, hat mir sehr geholfen

Bis Bald