Nach Erstellt_am sortieren

[McSaesch]

Hallo

Habe ich irgendwie die Möglichkeit mit VB6 einen Ordner auszulesen, die Daten darin dann unabhängig vom Namen nach dem Erstellt_am-Datum zu sortieren und umzunennen????

thx:D

[Amstelchen]

2 unterschiedliche methoden, ungetestet:

a) mit API; FindFirstFile, FindNextFile und FileTimeToSystemTime...

hFind = FindFirstFile(File, wFD)

Do

      Result = FindNextFile(hFind, wFD)

      If Result > 0 Then 


  bla = FileTimeToSystemTime(wFD.ftCreationTime, FTime)

  'ausgabe von FTime.wDay & "." & FTime.wMonth & "." & FTime.wYear

Loop While Result > 0

mit FSO...

Dim fso

Set fso = CreateObject("Scripting.FileSystemObject")

msgbox fso.GetFile("x:\meine\datei.txt").DateLastModified,1)

s'Amstel

[McSaesch]

Morgens

Thx erstmal für deine Antwort, doch leider hat es nicht ganz geklappt. Beim FSO hat er ...").DateLastModified,1 nicht gekannt. Aber wenn es die Möglichkeit gibt, das mit dem FSO zu bewerkstelligen will ich doch mal sehn was sich da machen lässt.