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
|
|
XMP Array Property - Bag, Seq, or AltHow to insert or update an XMP array property (bag, seq, or alt). <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 ' Load a JPG or TIF image file. ' Sample JPG's with XMP metadata may be found at: ' http://www.chilkatsoft.com/testData/xmp/sample1.jpg ' http://www.chilkatsoft.com/testData/xmp/sample2.jpg ' http://www.chilkatsoft.com/testData/xmp/sample3.jpg success = xmp.LoadAppFile("sample1.jpg") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode(xmp.LastErrorText) & "</pre>" End If Response.Write "<pre>" & Server.HTMLEncode( "Num embedded XMP docs: " _ & xmp.NumEmbedded) & "</pre>" ' Assuming there is at least one, get the 1st. ' (There is typically never more than one, but theoretically it's possible.) ' xml is a Chilkat.Xml Set xml = xmp.GetEmbedded(0) If (Not (xml Is Nothing )) Then ' Create an object to hold one or more string values. set sa = Server.CreateObject("Chilkat.CkStringArray") sa.Append "value_1" sa.Append "value_2" ' ... success = xmp.AddArray(xml,"bag","Iptc4xmpCore:Chilkat",sa) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode(xmp.LastErrorText) & "</pre>" Else ' Save the JPG. xmp.SaveAppFile = xmp S ("modified.jpg") End If Else Response.Write "<pre>" & Server.HTMLEncode(xmp.LastErrorText) & "</pre>" End If %> </body> </html> |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.