Chilkat Examples

ChilkatHOME.NET Core C#Android™AutoItCC#C++Chilkat2-PythonCkPythonClassic ASPDataFlexDelphi ActiveXDelphi DLLGoJavaLianjaMono C#Node.jsObjective-CPHP ActiveXPHP ExtensionPerlPowerBuilderPowerShellPureBasicRubySQL ServerSwift 2Swift 3,4,5...TclUnicode CUnicode C++VB.NETVBScriptVisual Basic 6.0Visual FoxProXojo Plugin

Tcl Examples

Web API Categories

ASN.1
AWS KMS
AWS Misc
Amazon EC2
Amazon Glacier
Amazon S3
Amazon S3 (new)
Amazon SES
Amazon SNS
Amazon SQS
Async
Azure Cloud Storage
Azure Key Vault
Azure Service Bus
Azure Table Service
Base64
Bounced Email
Box
CAdES
CSR
CSV
Certificates
Cloud Signature CSC
Code Signing
Compression
DKIM / DomainKey
DNS
DSA
Diffie-Hellman
Digital Signatures
Dropbox
Dynamics CRM
EBICS
ECC
Ed25519
Email Object
Encryption
FTP
FileAccess
Firebase
GMail REST API
GMail SMTP/IMAP/POP
Geolocation
Google APIs
Google Calendar
Google Cloud SQL
Google Cloud Storage
Google Drive
Google Photos
Google Sheets
Google Tasks
Gzip
HTML-to-XML/Text
HTTP

HTTP Misc
IMAP
JSON
JSON Web Encryption (JWE)
JSON Web Signatures (JWS)
JSON Web Token (JWT)
Java KeyStore (JKS)
MHT / HTML Email
MIME
MS Storage Providers
Microsoft Graph
Misc
NTLM
OAuth1
OAuth2
OIDC
Office365
OneDrive
OpenSSL
Outlook
Outlook Calendar
Outlook Contact
PDF Signatures
PEM
PFX/P12
PKCS11
POP3
PRNG
REST
REST Misc
RSA
SCP
SCard
SFTP
SMTP
SSH
SSH Key
SSH Tunnel
ScMinidriver
Secrets
SharePoint
SharePoint Online
Signing in the Cloud
Socket/SSL/TLS
Spider
Stream
Tar Archive
ULID/UUID
Upload
WebSocket
XAdES
XML
XML Digital Signatures
XMP
Zip
curl
uncategorized

 

 

 

(Tcl) Extract XMP MetaData as XML

Demonstrates how to open a JPG or TIF image file and extract the XMP metadata as XML.

Chilkat Tcl Extension Downloads

Chilkat Tcl Extension Downloads

load ./chilkat.dll

# This requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

set xmp [new_CkXmp]

# Load a JPG or TIF image file.
# Sample JPG's with XMP metadata may be found at:
# https://www.chilkatsoft.com/testData/xmp/sample1.jpg
# https://www.chilkatsoft.com/testData/xmp/sample2.jpg
# https://www.chilkatsoft.com/testData/xmp/sample3.jpg
set success [CkXmp_LoadAppFile $xmp "qa_data/xmp/sample1.jpg"]
if {$success != 1} then {
    puts [CkXmp_lastErrorText $xmp]
    delete_CkXmp $xmp
    exit
}

puts "Num embedded XMP docs: [CkXmp_get_NumEmbedded $xmp]"

# Assuming there is at least one, get the 1st.
# (There is typically never more than one, but theoretically it's possible.)
# xml is a CkXml
set xml [CkXmp_GetEmbedded $xmp 0]
if {[CkXmp_get_LastMethodSuccess $xmp] == 0} then {
    puts "No XMP metadata found."
    delete_CkXmp $xmp
    exit
}

puts [CkXml_getXml $xml]

# Sample output:

# <?xml version="1.0" encoding="utf-8"?>
# <x:xmpmeta xmlns:x="adobe:ns:meta/" x:xmptk="XMP toolkit 3.0-28, framework 1.6">
#     <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:iX="http://ns.adobe.com/iX/1.0/">
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:xmpPLUS="XMP Photographic Licensing Universal System (xmpPLUS, http://ns.adobe.com/xap/1.0/PLUS/)">
#             <xmpPLUS:CreditLineReq>False</xmpPLUS:CreditLineReq>
#             <xmpPLUS:ReuseAllowed>False</xmpPLUS:ReuseAllowed>
#         </rdf:Description>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:Iptc4xmpCore="http://iptc.org/std/Iptc4xmpCore/1.0/xmlns/">
#             <Iptc4xmpCore:IntellectualGenre>Profile</Iptc4xmpCore:IntellectualGenre>
#             <Iptc4xmpCore:Location>Lake Superior</Iptc4xmpCore:Location>
#             <Iptc4xmpCore:CountryCode>US</Iptc4xmpCore:CountryCode>
#             <Iptc4xmpCore:CreatorContactInfo rdf:parseType="Resource">
#                 <Iptc4xmpCore:CiAdrExtadr>John Doe Photography, 123 Maple Lane</Iptc4xmpCore:CiAdrExtadr>
#                 <Iptc4xmpCore:CiAdrCity>Champaign</Iptc4xmpCore:CiAdrCity>
#                 <Iptc4xmpCore:CiAdrRegion>Illinois</Iptc4xmpCore:CiAdrRegion>
#                 <Iptc4xmpCore:CiAdrPcode>61820</Iptc4xmpCore:CiAdrPcode>
#                 <Iptc4xmpCore:CiAdrCtry>USA</Iptc4xmpCore:CiAdrCtry>
#                 <Iptc4xmpCore:CiTelWork>+1 (217) 1234567</Iptc4xmpCore:CiTelWork>
#                 <Iptc4xmpCore:CiEmailWork>john@doe.com</Iptc4xmpCore:CiEmailWork>
#                 <Iptc4xmpCore:CiUrlWork>www.doe.com</Iptc4xmpCore:CiUrlWork>
#             </Iptc4xmpCore:CreatorContactInfo>
#             <Iptc4xmpCore:SubjectCode>
#                 <rdf:Bag>
#                     <rdf:li>14024001</rdf:li>
#                 </rdf:Bag>
#             </Iptc4xmpCore:SubjectCode>
#             <Iptc4xmpCore:Scene>
#                 <rdf:Bag>
#                     <rdf:li>012300</rdf:li>
#                 </rdf:Bag>
#             </Iptc4xmpCore:Scene>
#         </rdf:Description>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:exif="http://ns.adobe.com/exif/1.0/">
#             <exif:ColorSpace>1</exif:ColorSpace>
#             <exif:PixelXDimension>288</exif:PixelXDimension>
#             <exif:PixelYDimension>432</exif:PixelYDimension>
#         </rdf:Description>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:pdf="http://ns.adobe.com/pdf/1.3/"/>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:photoshop="http://ns.adobe.com/photoshop/1.0/">
#             <photoshop:AuthorsPosition>Photographer</photoshop:AuthorsPosition>
#             <photoshop:Headline>Young boy yelling</photoshop:Headline>
#             <photoshop:CaptionWriter>John Doe</photoshop:CaptionWriter>
#             <photoshop:DateCreated>2004-08-19</photoshop:DateCreated>
#             <photoshop:City>Marquette</photoshop:City>
#             <photoshop:State>Michigan</photoshop:State>
#             <photoshop:Country>United States</photoshop:Country>
#             <photoshop:TransmissionReference>PO 34567</photoshop:TransmissionReference>
#             <photoshop:Instructions>Original RAW capture Nikon D2X, Adobe RGB 1998.</photoshop:Instructions>
#             <photoshop:Credit>John Doe Photography</photoshop:Credit>
#             <photoshop:Source>John Doe Photography</photoshop:Source>
#             <photoshop:History/>
#         </rdf:Description>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:tiff="http://ns.adobe.com/tiff/1.0/">
#             <tiff:XResolution>72/1</tiff:XResolution>
#             <tiff:YResolution>72/1</tiff:YResolution>
#             <tiff:ResolutionUnit>2</tiff:ResolutionUnit>
#             <tiff:Orientation>1</tiff:Orientation>
#         </rdf:Description>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:xap="http://ns.adobe.com/xap/1.0/">
#             <xap:CreateDate>2005-03-13T02:02:29-06:00</xap:CreateDate>
#             <xap:ModifyDate>2005-03-13T02:02:29-06:00</xap:ModifyDate>
#             <xap:MetadataDate>2005-03-13T02:02:29-06:00</xap:MetadataDate>
#             <xap:CreatorTool>Adobe Photoshop CS Windows</xap:CreatorTool>
#         </rdf:Description>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:stRef="http://ns.adobe.com/xap/1.0/sType/ResourceRef#" xmlns:xapMM="http://ns.adobe.com/xap/1.0/mm/">
#             <xapMM:DerivedFrom rdf:parseType="Resource">
#                 <stRef:instanceID>uuid:f5b64171-9394-11d9-bb8e-a67e6693b6e9</stRef:instanceID>
#                 <stRef:documentID>adobe:docid:photoshop:e4d002a4-9392-11d9-bb8e-a67e6693b6e9</stRef:documentID>
#             </xapMM:DerivedFrom>
#             <xapMM:DocumentID>adobe:docid:photoshop:0f410647-9396-11d9-bb8e-a67e6693b6e9</xapMM:DocumentID>
#         </rdf:Description>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:xapRights="http://ns.adobe.com/xap/1.0/rights/">
#             <xapRights:Marked>True</xapRights:Marked>
#             <xapRights:WebStatement>http://www.doe.com</xapRights:WebStatement>
#             <xapRights:RightsUsageTerms>
#                 <rdf:Alt>
#                     <rdf:li xml:lang="x-default">For consideration only, no reproduction without prior permission</rdf:li>
#                 </rdf:Alt>
#             </xapRights:RightsUsageTerms>
#             <xapRights:UsageTerms>
#                 <rdf:Alt>
#                     <rdf:li xml:lang="x-default">For consideration only, no reproduction without prior permission</rdf:li>
#                 </rdf:Alt>
#             </xapRights:UsageTerms>
#         </rdf:Description>
#         <rdf:Description rdf:about="uuid:0f410648-9396-11d9-bb8e-a67e6693b6e9" xmlns:dc="http://purl.org/dc/elements/1.1/">
#             <dc:format>image/jpeg</dc:format>
#             <dc:description>
#                 <rdf:Alt>
#                     <rdf:li xml:lang="x-default">Three year old African American boy yells with joy on beach during vacation.</rdf:li>
#                 </rdf:Alt>
#             </dc:description>
#             <dc:title>
#                 <rdf:Alt>
#                     <rdf:li xml:lang="x-default">20040819_pe_014578d.nef</rdf:li>
#                 </rdf:Alt>
#             </dc:title>
#             <dc:rights>
#                 <rdf:Alt>
#                     <rdf:li xml:lang="x-default">2004 John Doe, all rights reserved</rdf:li>
#                 </rdf:Alt>
#             </dc:rights>
#             <dc:creator>
#                 <rdf:Seq>
#                     <rdf:li>John Doe</rdf:li>
#                 </rdf:Seq>
#             </dc:creator>
#             <dc:subject>
#                 <rdf:Bag>
#                     <rdf:li>boy</rdf:li>
#                     <rdf:li>gender</rdf:li>
#                     <rdf:li>human beings</rdf:li>
#                     <rdf:li>humans</rdf:li>
#                     <rdf:li>lad</rdf:li>
#                     <rdf:li>male</rdf:li>
#                     <rdf:li>people</rdf:li>
#                     <rdf:li>3-12 years old</rdf:li>
#                     <rdf:li>age</rdf:li>
#                     <rdf:li>child</rdf:li>
#                     <rdf:li>youth</rdf:li>
#                     <rdf:li>african american</rdf:li>
#                     <rdf:li>african-american</rdf:li>
#                     <rdf:li>black</rdf:li>
#                     <rdf:li>ethnic</rdf:li>
#                     <rdf:li>ethnicity</rdf:li>
#                     <rdf:li>people of color</rdf:li>
#                     <rdf:li>race</rdf:li>
#                     <rdf:li>beach</rdf:li>
#                     <rdf:li>nature</rdf:li>
#                     <rdf:li>scenery</rdf:li>
#                     <rdf:li>emotion</rdf:li>
#                     <rdf:li>emotional</rdf:li>
#                     <rdf:li>emotions</rdf:li>
#                     <rdf:li>happiness</rdf:li>
#                     <rdf:li>happy</rdf:li>
#                     <rdf:li>joy</rdf:li>
#                     <rdf:li>joyful</rdf:li>
#                     <rdf:li>joyous</rdf:li>
#                 </rdf:Bag>
#             </dc:subject>
#         </rdf:Description>
#     </rdf:RDF>
# </x:xmpmeta>

# You can generate parsing code using Chilkat's online tool : 
# Generate Parsing Code from XML

set x_xmpmeta_xmlns_x [CkXml_getAttrValue $xml "xmlns:x"]
set x_xmpmeta_x_xmptk [CkXml_getAttrValue $xml "x:xmptk"]
set rdf_RDF_xmlns_rdf [CkXml_chilkatPath $xml "rdf:RDF|(xmlns:rdf)"]
set rdf_RDF_xmlns_iX [CkXml_chilkatPath $xml "rdf:RDF|(xmlns:iX)"]
set i 0
set count_i [CkXml_NumChildrenHavingTag $xml "rdf:RDF|rdf:Description"]
while {$i < $count_i} {
    CkXml_put_I $xml $i
    set rdf_Description_rdf_about [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(rdf:about)"]
    set rdf_Description_xmlns_xmpPLUS [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:xmpPLUS)"]
    set rdf_Description_xmlns_Iptc4xmpCore [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:Iptc4xmpCore)"]
    set rdf_Description_xmlns_exif [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:exif)"]
    set rdf_Description_xmlns_pdf [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:pdf)"]
    set rdf_Description_xmlns_photoshop [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:photoshop)"]
    set rdf_Description_xmlns_tiff [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:tiff)"]
    set rdf_Description_xmlns_xap [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:xap)"]
    set rdf_Description_xmlns_stRef [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:stRef)"]
    set rdf_Description_xmlns_xapMM [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:xapMM)"]
    set rdf_Description_xmlns_xapRights [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:xapRights)"]
    set rdf_Description_xmlns_dc [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|(xmlns:dc)"]
    set xmpPLUS_CreditLineReq [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xmpPLUS:CreditLineReq"]
    set xmpPLUS_ReuseAllowed [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xmpPLUS:ReuseAllowed"]
    set Iptc4xmpCore_IntellectualGenre [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:IntellectualGenre"]
    set Iptc4xmpCore_Location [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:Location"]
    set Iptc4xmpCore_CountryCode [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CountryCode"]
    set Iptc4xmpCore_CreatorContactInfo_rdf_parseType [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|(rdf:parseType)"]
    set Iptc4xmpCore_CiAdrExtadr [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|Iptc4xmpCore:CiAdrExtadr"]
    set Iptc4xmpCore_CiAdrCity [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|Iptc4xmpCore:CiAdrCity"]
    set Iptc4xmpCore_CiAdrRegion [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|Iptc4xmpCore:CiAdrRegion"]
    set Iptc4xmpCore_CiAdrPcode [CkXml_GetChildIntValue $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|Iptc4xmpCore:CiAdrPcode"]
    set Iptc4xmpCore_CiAdrCtry [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|Iptc4xmpCore:CiAdrCtry"]
    set Iptc4xmpCore_CiTelWork [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|Iptc4xmpCore:CiTelWork"]
    set Iptc4xmpCore_CiEmailWork [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|Iptc4xmpCore:CiEmailWork"]
    set Iptc4xmpCore_CiUrlWork [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:CreatorContactInfo|Iptc4xmpCore:CiUrlWork"]
    set rdf_li [CkXml_GetChildIntValue $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:SubjectCode|rdf:Bag|rdf:li"]
    set rdf_li [CkXml_GetChildIntValue $xml "rdf:RDF|rdf:Description[i]|Iptc4xmpCore:Scene|rdf:Bag|rdf:li"]
    set exif_ColorSpace [CkXml_GetChildIntValue $xml "rdf:RDF|rdf:Description[i]|exif:ColorSpace"]
    set exif_PixelXDimension [CkXml_GetChildIntValue $xml "rdf:RDF|rdf:Description[i]|exif:PixelXDimension"]
    set exif_PixelYDimension [CkXml_GetChildIntValue $xml "rdf:RDF|rdf:Description[i]|exif:PixelYDimension"]
    set photoshop_AuthorsPosition [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:AuthorsPosition"]
    set photoshop_Headline [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:Headline"]
    set photoshop_CaptionWriter [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:CaptionWriter"]
    set photoshop_DateCreated [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:DateCreated"]
    set photoshop_City [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:City"]
    set photoshop_State [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:State"]
    set photoshop_Country [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:Country"]
    set photoshop_TransmissionReference [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:TransmissionReference"]
    set photoshop_Instructions [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:Instructions"]
    set photoshop_Credit [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:Credit"]
    set photoshop_Source [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|photoshop:Source"]
    set tiff_XResolution [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|tiff:XResolution"]
    set tiff_YResolution [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|tiff:YResolution"]
    set tiff_ResolutionUnit [CkXml_GetChildIntValue $xml "rdf:RDF|rdf:Description[i]|tiff:ResolutionUnit"]
    set tiff_Orientation [CkXml_GetChildIntValue $xml "rdf:RDF|rdf:Description[i]|tiff:Orientation"]
    set xap_CreateDate [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xap:CreateDate"]
    set xap_ModifyDate [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xap:ModifyDate"]
    set xap_MetadataDate [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xap:MetadataDate"]
    set xap_CreatorTool [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xap:CreatorTool"]
    set xapMM_DerivedFrom_rdf_parseType [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|xapMM:DerivedFrom|(rdf:parseType)"]
    set stRef_instanceID [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xapMM:DerivedFrom|stRef:instanceID"]
    set stRef_documentID [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xapMM:DerivedFrom|stRef:documentID"]
    set xapMM_DocumentID [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xapMM:DocumentID"]
    set xapRights_Marked [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xapRights:Marked"]
    set xapRights_WebStatement [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xapRights:WebStatement"]
    set rdf_li_xml_lang [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|xapRights:RightsUsageTerms|rdf:Alt|rdf:li|(xml:lang)"]
    set strRdf_li [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xapRights:RightsUsageTerms|rdf:Alt|rdf:li"]
    set rdf_li_xml_lang [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|xapRights:UsageTerms|rdf:Alt|rdf:li|(xml:lang)"]
    set strRdf_li [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|xapRights:UsageTerms|rdf:Alt|rdf:li"]
    set dc_format [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|dc:format"]
    set rdf_li_xml_lang [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|dc:description|rdf:Alt|rdf:li|(xml:lang)"]
    set strRdf_li [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|dc:description|rdf:Alt|rdf:li"]
    set rdf_li_xml_lang [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|dc:title|rdf:Alt|rdf:li|(xml:lang)"]
    set strRdf_li [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|dc:title|rdf:Alt|rdf:li"]
    set rdf_li_xml_lang [CkXml_chilkatPath $xml "rdf:RDF|rdf:Description[i]|dc:rights|rdf:Alt|rdf:li|(xml:lang)"]
    set strRdf_li [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|dc:rights|rdf:Alt|rdf:li"]
    set strRdf_li [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|dc:creator|rdf:Seq|rdf:li"]
    set j 0
    set count_j [CkXml_NumChildrenHavingTag $xml "rdf:RDF|rdf:Description[i]|dc:subject|rdf:Bag|rdf:li"]
    while {$j < $count_j} {
        CkXml_put_J $xml $j
        set strRdf_li [CkXml_getChildContent $xml "rdf:RDF|rdf:Description[i]|dc:subject|rdf:Bag|rdf:li[j]"]
        set j [expr $j + 1]
    }
    set i [expr $i + 1]
}

delete_CkXml $xml


delete_CkXmp $xmp

 

© 2000-2024 Chilkat Software, Inc. All Rights Reserved.