GetImageInfo vFileName[, vDataType]
| 0 (default) | Search for any data type. First found data will be processed. |
| 1 | Search for EXIF data only. |
| 2 | Search for IPTC data only. |
Set g = CreateObject("shotgraph.image")
file_name = "c:\files\image.jpg"
Set info = g.GetImageInfo(file_name,1)
Wscript.echo info("Model")
|
Set g = CreateObject("shotgraph.image")
filename = "c:\images\ixus.jpg"
Set info = g.GetImageInfo(filename)
s = ""
for each key in info
s = s & key & ": "
if IsArray(info(key)) then
ar = info(key)
for j = 0 to UBound(ar)
s = s & ar(j) & " "
next
s = s & Chr(13) & Chr(10)
else
s = s & info(key) & Chr(13) & Chr(10)
end if
Next
Wscript.echo s
|
| Type | Read-only. Contains type of retrieved data (1 - EXIF, 2 - IPTC). |
| ErrorCode | Read-only. Contains 0 if there were no errors. Other possible values:
1 - file can not be opened 2 - file can not be recognized as valid JPEG 3 - no EXIF or IPTC data in file. |
| Count | Read-only. Contains amount of retrieved keys. |
| Item("key") | Read-only. Contains value of retrieved key. If there is no such key in the image, returns empty variable. |