Datei Eigenschaften

Hallo zusammen

Kann mir jemand sagen, wie ich in einer ListView zB das erstellungsdatum der Dateien anzeigen kann?

Ich bekomm das irgendwie nicht hin.

Ich habe volgenden code Struktur:

Private Sub ListView1_DblClick()
Private Sub Dir1_Change()
Private Sub Form_Load()
Private Sub Form_Unload(Cancel As Integer)
Private Sub mnuList_Click()
Private Sub Drive1_Change()
Public Sub FillListView1WithFiles(ByVal path As String)
Private Function CheckPath(ByVal path As String) As String

Und in der rivate Sub FillListView1WithFiles(ByVal path As String) hab ich:

Private Sub FillListView1WithFiles(ByVal path As String)
Dim Item As ListItem
Dim s As String
path = CheckPath(path)
s = Dir(path, vbNormal)
Do While s „“
Set Item = ListView1.ListItems.Add()
Item.Key = path & s
Item.Text = s
Item.SubItems(1) = path
s = Dir
Loop
End Sub

hallo,

ich weis nicht ob du mit herkömmlichen mitteln an das datum herankommst.

versuche es doch mal mit dem FSO-Object

gruß

rasta

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

Ich würde es einmal mit dem Befehl Date Created versuchen. Zu finden in dem Hilfemenü von Excel unter der Rubrik File.

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