Hi,

I found code to extract the metadata(Artist, resolution, bitrate, duration) from files but it work for a whole folder and I want to do it for only one file. I have a folder,subfolder with a lot of mp3,mov,wmv and this will take more time. How?

Thank's in advance for you answers.

loShell = CreateObject("Shell.Application")
loFolder = loShell.Namespace("F:\trailers")

For Each lcFileName in loFolder.Items
   FOR t= 0 TO 34
       ? "File name "+STR(t,2)+": "+ loFolder.GetDetailsOf(lcFileName, t)
   ENDFOR 
Next

RETURN