(Visual FoxPro) Examine the Contents of a .p7m by Converting to XML
Examines the contents of a .p7m signature by converting it to XML.
LOCAL loAsn
LOCAL lnSuccess
LOCAL lcStrXml
LOCAL loXml
* This example requires the Chilkat API to have been previously unlocked.
* See Global Unlock Sample for sample code.
loAsn = CreateObject('Chilkat_9_5_0.Asn')
lnSuccess = loAsn.LoadBinaryFile("qa_data/p7m/a.p7m")
IF (lnSuccess <> 1) THEN
? loAsn.LastErrorText
RELEASE loAsn
CANCEL
ENDIF
* Convert to XML.
lcStrXml = loAsn.AsnToXml()
* The XML returned by AsnToXml will be compact.
* To get the XML indented in human-readable form, load
* into the Chilkat XML object and emit..
loXml = CreateObject('Chilkat_9_5_0.Xml')
loXml.LoadXml(lcStrXml)
? loXml.GetXml()
loXml.SaveXml("qa_output/a.xml")
* -----------------------------------------------------------------------------------------
* Also see Chilkat's online tool to examine a .p7m and generate code to duplicate the .p7m
* -----------------------------------------------------------------------------------------
RELEASE loAsn
RELEASE loXml
|