I have successfully used the code below to find photos on my iPad that are between a dat range.
However, when the photos are copied to a folder onmy hard drive, they end up with the date and time that they were copied, not when they were taken or 'created'.
I've viewed both the 'Modified' and 'Created' dates and both are the copied date and time.
If I access the iPad directly and then highlight/copy these same photos, the modified/created date/time are the correct
'loop trough all (root) items in the camera device
For Each itm In d.Items
Dim f As Properties
Set f = itm.Properties
Dim str As String
lCounter = lCounter + 1
strHold = ""
Name = d.Items(lCounter).Properties("Item Name").Value
Ext = d.Items(lCounter).Properties("Filename extension").Value
Set v = d.Items(lCounter).Properties("Item Time Stamp").Value
PhotoDate = Format(v.Date, "mm/dd/yyyy")
'Debug.Print "Photo Number " & Format(i, "##0") & " Name: " & Name & "." & Ext & " Date taken: " & PhotoDate
If IsBetween(PhotoDate, dtDateFrom, dtDateTo) Then
'download the file to a temp buffer
Set imgpic = itm.Transfer
'store the file name and extension and app.path in a string,
'so you can use it to perform more operations on it
str = App.Path & "\downloaded images\" & Name & "." & Ext