|  | 
Chilkat  HOME  Android™  AutoIt  C  C#  C++  Chilkat2-Python  CkPython  Classic ASP  DataFlex  Delphi DLL  Go  Java  Node.js  Objective-C  PHP Extension  Perl  PowerBuilder  PowerShell  PureBasic  Ruby  SQL Server  Swift  Tcl  Unicode C  Unicode C++  VB.NET  VBScript  Visual Basic 6.0  Visual FoxPro  Xojo Plugin
| (Classic ASP) Add XMP MetaData to JPG or TIFFDemonstrates how to add XMP metadata to a JPG or TIFF image that doesn't already have XMP metadata. 
 <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Xmp") set xmp = Server.CreateObject("Chilkat.Xmp") ' The first step is to create a new XMP document, which is nothing ' more than XML. The NewXmp method returns an XML document with ' the standard XMP boilerplate. ' xml is a Chilkat.Xml Set xml = xmp.NewXmp() ' Add some properties... success = xmp.AddSimpleStr(xml,"Iptc4xmpCore:Chilkat","Blah blah") ' If you wish to view the XML, save it to a file and review it ' with a text editor: success = xml.SaveXml("newXmp.xml") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( xml.LastErrorText) & "</pre>" Response.End End If ' To add the XMP to the JPG (or TIFF), simply load the JPG, ' append the XMP, and save: success = xmp.LoadAppFile("scream.jpg") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( xmp.LastErrorText) & "</pre>" Response.End End If success = xmp.Append(xml) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( xmp.LastErrorText) & "</pre>" Response.End End If success = xmp.SaveAppFile("screamOut.jpg") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( xmp.LastErrorText) & "</pre>" Response.End End If %> </body> </html> | ||||
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.