[VBScript]
Set gr = Server.CreateObject("ImageGlue7.Graphic")
theFile = Server.MapPath("iptc.tif")
gr.ReadIPTC = True
gr.SetFile theFile
Response.Write gr.IPTC.Values("Keyword", ",")
This example writes the keywords from a TIFF file in comma
delimited format.
|