File properties

[stralkin]

is there a way i can retrieve all of the file properties from a file - i know how to retrieve the file name and size with the properties of a FileSystemObject, but not how to get other properties, such as the image size or Date Picture Taken from a jpeg imported from a camera. - how do i get a complete list of the properties for a file?

 

[gmmastros]

What you are looking for is called EXIF properties.

http://www.exif.org/specifications.html

http://www.vbaccelerator.com/home/V...g_EXIF_and_Other_Image_Properties/article.asp

-George

"The great things about standards is that there are so many to choose from." - Fortune Cookie Wisdom

 

[strongm]

The following code will fill a list box with all the extended properties that the Shell knows about:

[blue]Private Sub Command1_Click()

    Dim i As Long
    Dim objShell As Object
    Dim objFolder As Object
    
    Set objShell = CreateObject("Shell.Application")
    Set objFolder = objShell.Namespace("C:\")
    
    Do Until objFolder.GetDetailsOf(objFolder.Items, i) = ""
        ListBox1.AddItem objFolder.GetDetailsOf(objFolder.Items, i)
        i = i + 1
    Loop

End Sub[/blue]

Given a specific named property from this list and a file, we can extract that value of the property (if that particular file supports it ...) something like this:

Debug.Print CreateObject("Shell.Application").Namespace("C:\Downloads").Items.Item("000-012.jpg").ExtendedProperty("Owner")