"Dir"-Befehl alleine?

Diskutiere "Dir"-Befehl alleine? im Programmierung Forum im Bereich Software Forum; Sub ExcelDateienZählen() 'Dim strVerzeichnis As String Dim strDateiname As String Dim i As Integer 'strVerzeichnis =...
meinmartin

meinmartin

Threadstarter
Dabei seit
28.07.2005
Beiträge
143
Ort
Regierungsbezirk Köln
Sub ExcelDateienZählen()
'Dim strVerzeichnis As String
Dim strDateiname As String
Dim i As Integer

'strVerzeichnis = "C:\Dokumente und Einstellungen\Martin Work.PEACY\Eigene Dateien\Excel97\"
strDateiname = Dir("C:\Dokumente und Einstellungen\Martin Work.PEACY\Eigene Dateien\Excel97\*.xls")

While strDateiname <> ""
strDateiname = Dir
'MsgBox strDateiname
i = i + 1
Wend
MsgBox "Es sind " & i & " Dateien dieses Typs im angegebenen Ordner.", vbInformation
End Sub

Warum funktioniert diese Prozedur? Ich verstehe die Zeile
strDateiname = Dir
nicht. Wie kann "Dir" alleine stehen und was gibt es dann zurück? Im Direktfenster Dir allein eingegeben gibt es eine Fehlermeldung.

Für Hilfe wäre ich sehr dankbar,
Euer
meinmartin


:blush
 
meinmartin

meinmartin

Threadstarter
Dabei seit
28.07.2005
Beiträge
143
Ort
Regierungsbezirk Köln
Sub DirAlleine()
Dim strDateiname As String

strDateiname = Dir
MsgBox strDateiname
End Sub

Diese Prozedur funktioniert aber nicht. In derjenigen von eben wurde doch nichts an Dir übergeben, wieso also kann es alleine stehen? Das verstehe ich leider nicht.
 
Bullayer

Bullayer

Schwergewicht
Dabei seit
19.07.2006
Beiträge
24.163
Ort
DE-RLP-COC
Normalerweise beginnt so eine Schleife mit strDateiname = Dir("C:\Verzeichnis\*.*").
 
DiableNoir

DiableNoir

Dabei seit
18.01.2004
Beiträge
6.069
Also vielleicht solte man das noch etwas konkretisieren, dann dürfte es klar werden. ;)

Also Dir() gibt nur einen String mit dem Dateinamen der nächsten gefundenen Datei zurück. Die beiden Parameter sind dabei optional, das heißt sie müssen nicht angegeben werden.

Natrülich muss Dir() bei der ersten Verwendung ein Pfad angegeben werden, denn es muss ja wissen was du erstmal überhaupt von der Funktion willst. Alle weiteren Aufrufe ohne Parameter (!!) geben den jeweils nächsten Dateinamen zurück bis nichts mehr gefunden wird, dann wird ein leerer String "" zurückgegeben.

Deshalb funktioniert auch der 2. Code nicht bzw. nicht richtig.

BTW: Die MSDN Ist bei sowas eine gute Informationsquelle: http://msdn.microsoft.com/en-us/library/dk008ty4(VS.71).aspx
 
Thema:

"Dir"-Befehl alleine?

"Dir"-Befehl alleine? - Ähnliche Themen

  • Probleme mit Windows 10 Dism befehle &sfc/scannow gehen nicht

    Probleme mit Windows 10 Dism befehle &sfc/scannow gehen nicht: Hallo, ich habe seit ein paar tagen das Problem gehabt das mein Rechner nicht richtig runtergefahren ist bzw einfach wieder hochgefahren ist dann...
  • Befehl "robocopy" / Parametereinstellung

    Befehl "robocopy" / Parametereinstellung: Hallo! Mit dem Befehl "robocopy" kann ich mit dem Parameter "/M" nur Dateien kopieren, bei denen kein "Archivattribut" gesetzt ist. Gibt es...
  • Windows 7 stürzt beim ausführen des Kopier-Befehls im Explorer immer ab

    Windows 7 stürzt beim ausführen des Kopier-Befehls im Explorer immer ab: Hallo, ich nutze noch eine alte Windows 7 Version. Für einige wenige Anwendungen würden ich den Rechner gern in Betrieb halten, jedoch stürzt er...
  • Alexa, warum hast du gerade gesprochen? So erklärt Euch Alexa auf Befehl ihre letzten Aktionen!

    Alexa, warum hast du gerade gesprochen? So erklärt Euch Alexa auf Befehl ihre letzten Aktionen!: Auch wenn wohl einige User der Technik nach wie vor nur bedingt trauen, sind virtuelle Assistenten wie der Google Assistant, Apples Siri oder...
  • Ähnliche Themen
  • Probleme mit Windows 10 Dism befehle &sfc/scannow gehen nicht

    Probleme mit Windows 10 Dism befehle &sfc/scannow gehen nicht: Hallo, ich habe seit ein paar tagen das Problem gehabt das mein Rechner nicht richtig runtergefahren ist bzw einfach wieder hochgefahren ist dann...
  • Befehl "robocopy" / Parametereinstellung

    Befehl "robocopy" / Parametereinstellung: Hallo! Mit dem Befehl "robocopy" kann ich mit dem Parameter "/M" nur Dateien kopieren, bei denen kein "Archivattribut" gesetzt ist. Gibt es...
  • Windows 7 stürzt beim ausführen des Kopier-Befehls im Explorer immer ab

    Windows 7 stürzt beim ausführen des Kopier-Befehls im Explorer immer ab: Hallo, ich nutze noch eine alte Windows 7 Version. Für einige wenige Anwendungen würden ich den Rechner gern in Betrieb halten, jedoch stürzt er...
  • Alexa, warum hast du gerade gesprochen? So erklärt Euch Alexa auf Befehl ihre letzten Aktionen!

    Alexa, warum hast du gerade gesprochen? So erklärt Euch Alexa auf Befehl ihre letzten Aktionen!: Auch wenn wohl einige User der Technik nach wie vor nur bedingt trauen, sind virtuelle Assistenten wie der Google Assistant, Apples Siri oder...
  • Oben