[quote=Kees Baltus;350397]I need to read "Title tag" and "original date"of pictures.
I installed WIAaut.dll and put Commondialog on form.
I can read all items from the Img.Properties with a loop.


SOLUTION:
Set Img = CreateObject("WIA.ImageFile")
Set IP = CreateObject("WIA.ImageProcess")
Set fs = CreateObject("Scripting.FileSystemObject")

Img.LoadFile "C:\Yvonne.jpg"
Set f = fs.GetFile("c:\Yvonne.jpg")

If Img.Properties.Exists("36867") Then
MsgBox "Date of original = " & Img.Properties("36867").Value
Else
MsgBox "Datecreated = " & f.DateCreated
End If

[quote=Kees Baltus;353817]