Problemen met objFolder.GetDetailsOf(strFileName, 12)

Status
Niet open voor verdere reacties.
K

keb

Gebruiker
Lid geworden
20 feb 2011
Berichten
133
Vooraf: ik heb een nieuw item gemaakt van een aanvullende vraag op een vorige post

Omdat ik een uniforme datumnotatie nastreef gebruikte ik
Cells(row, 4) = CDate(objFolder.GetDetailsOf(strFileName, 12)) 'Date taken​
maar dat geeft aan "Typen komen niet met elkaar overeen".

Onderstaande regels werken wel:
Cells(row, 4) = objFolder.GetDetailsOf(strFileName, 12) 'Date taken
Cells(row, 10) = CDate(objFolder.GetDetailsOf(strFileName, 3)) 'Date modified
Cells(row, 11) = CDate() 'Date created​


Vraag:
Waarom levert objFolder.GetDetailsOf(strFileName, 12) een ander formaat gegeven op?
 

Bijlagen

  • EXif-info_ophalen_KEB.xlsm
    37,2 KB · Weergaven: 26
bij mij geeft 12 de categorie, niet het opnametijdstip.


Dit werkt hier:

Code: 
Sub M_snb()
   c00 = Dir("G:\foto\*.jpg")

   With CreateObject("shell.application").Namespace("G:\foto\")
       MsgBox .getdetailsof(.Items.Item(c00), 25)
       MsgBox CDate(.getdetailsof(.Items.Item(c00), 25))
    End With
End Sub
 
Dank SNB,

Even ter toelichting: bij mij levert item 12 wel "date taken", het zal mogelijk verschillen per Exif-file (afhankelijk van cameramerk?).

Waar het mij om gaat is het volgende:
Als ik het resultaat van objFolder.getdetailsof(strFileName, 12) in een Excel-cel plaats dit blijkbaar een tekst oplevert (links uitgelijnd).
Voorbeeld (Cells(row, 4) = objFolder.getdetailsof(strFileName, 12) )​

Met geen mogelijkheid weet ik het resultaat van "date taken" om te zetten tot een juiste datumnotatie (wel met de item 3 en 4, date modified en date created).
 
Toon dan de tekstreeks die objFolder.getdetailsof(strFileName, 12) bij jou oplevert.

De argumenten (12, c.q. 25) zijn afhankelijk van je Windows-versie.
 
De datum van 11 mei is het resultaat van CDate(objFolder.getdetailsof(strFileName, 3))
De dataums van april en juli zijn het resultaat van objFolder.getdetailsof(strFileName, 12), deze krijg ik niet geconverteerd met Cdate.

Resultaat.JPG
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan