Finding photos in network based on photo tags

[LonghronJ]

Does anyone know how to obtain a list of jpg photos based on their tags?

[rpeare]

http://www.access-programmers.co.uk/...d.php?t=265850

This shows how to access the .jpg attributes, note you have to turn on the reference 'microsoft shell controls and auotmation'

The tag property is attribute number 18. you'd just have to look for an instr I think

Dim objShell As Shell32.Shell
Dim objfolder As Shell32.Folder
Dim objfolderitem As Shell32.FolderItem


Set objShell = New Shell
Set objfolder = objShell.NameSpace(CurrentProject.Path)
Set objfolderitem = objfolder.ParseName("jellyfish.jpg")




Debug.Print "Attribute Number: 18 value is: " & objfolder.GetDetailsOf(objfolderitem, 18) '.Value


Set objfolderitem = Nothing
Set objfolder = Nothing
Set objShell = Nothing