|
Chilkat •
HOME •
Android™ •
ASP •
Visual Basic •
VB.NET •
C# •
iOS (IPhone) •
Objective-C •
C++ •
C •
MFC •
Delphi •
FoxPro •
Java •
Perl •
PHP Extension •
PHP ActiveX •
Python •
PowerShell •
Ruby •
SQL Server •
VBScript
|
|
Add XMP MetaData to JPG or TIFF
Demonstrates 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> <% set xmp = Server.CreateObject("Chilkat.Xmp") success = xmp.UnlockComponent("Anything for 30-day trial.") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode(xmp.LastErrorText) & "</pre>" End If ' 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>" 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>" End If success = xmp.Append(xml) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode(xmp.LastErrorText) & "</pre>" End If success = xmp.SaveAppFile("screamOut.jpg") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode(xmp.LastErrorText) & "</pre>" End If %> </body> </html> |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.
