[VBScript]
Set gr = Server.CreateObject("ImageGlue7.Graphic")
theFile = Server.MapPath("iptc.tif")
gr.ReadIPTC = True
gr.SetFile theFile
Response.Write gr.IPTC.Value("Headline") & "<br>"
Response.Write gr.IPTC.Value("Caption") & "<br>"
This example writes the Headline and Caption from a TIFF file.
No error will be raised if the IPTC data does not contain a
headline or caption.
|