You will need to extract with EXIF data from the file :

http://www.vbaccelerator.com/home/vb...es/article.asp

NickHK

"Neily" wrote in message
...
When I put photos from my Canon camera onto my computer, I hover the
cursor
over the file and it tells me the model of the camera and the "Date Taken"
the date the photo was taken on.

Now I messed about and found File Object code...
Sub ShowFileInfo(filespec)
Dim fs, f, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(filespec)
s = f.DateCreated
MsgBox s
End Sub

...and found I could return the file attributes such as Date Created and
Date Modified.

Does anyone know if there is a way to bring back the Date Taken attribute
from my image files taken with my camera.

Ta.

Neily again.