Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Sort by
Message
 
 
To
07/09/2006 07:55:24
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
01151579
Message ID:
01151711
Views:
41
>Naomi --
>
>Following Thread #700704, as you directed, allowed me to create this little PRG
>
Lparameters lcPictureFileName
>Local lcResult
>
>Local loImage As GpImage Of ffc/_gdiplus.vcx
>loImage = Newobject("GpImage", Home() + "ffc/_gdiplus.vcx")
>loImage.CreateFromFile(lcPictureFileName)
>lcResult = loImage.GetPropertyItem(306)
>
>Return Ctot( "^" + Strtran(Left(lcResult,10), ":", "/") + Right(lcResult,9))
>
>
>Which returns "Date Picture Taken" for a JPG file ... Thanks
>
Glad to help and thanks for sharing.

BTW, should not be parameter tcPictureFileName? <g>
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform