Dateieigenschaften auslesen
18.05.2021 13:55:51
henry
Aufgabe: Dateieigenschaften auslesen, speziell die Länge eines Videos.
Problem: Wenn ich über die Routine: "For Each Filename ..." gehe, dann funktioniert das super.
Ich möchte aber nur aus einer einzelnen Datei auslesen.
Daher belege ich eine Variable (myFilename) mit einem Dateinamen, z.B. myFilename = "Urlaub2010.mp4".
Wenn ich aber diese Variable in unten stehender Routine verwende, dann funktioniert das nicht.
Dann erhalte ich nicht die Videolänge im Format hh:mm:ss sondern nur den Text: "Länge", nicht aber die gewünschte Filmlänge.
Es funktioniert nicht einmal, wenn ich meine Variable direkt belege mit: myFilename=Filename !
Wer kann mir helfen? Was mache ich falsch?
Sub filmlänge()
Dim objFolder As Object
Dim objShell As Object
myFilename = "Urlaub2010.mp4" '